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Grüß Gott- 
Guten Tag 


Frühjahrskuren haben ja (wenn sie gelin- 
gen) den gegenteiligen Effekt, aber 
Schneider aktiv hat endlich zugelegt 
und hat mehr Umfang. Es war keine 
leichte Arbeit, denn wir wollen natür- 
lich nicht nur „Füllmaterial‘‘ heranneh- 
men. Die Frage, wie wir den neu hinzu- 
gekommenen Platz nutzen sollten, stellte 
sich gar nicht erst. Wir haben jetzt etwas 
mehr Gelegenheit, auf Ihre Wünsche 
einzugehen und können ınformativer sein. 
Unter anderem lesen Sie jetzt eine Arti- 
kelserie, die den etwas schwülstigen Titel 
„Grundlagen der Programmierung — 
Aufbau einer Datei“ trägt. Dazu gibt 
es eine kleine Vorgeschichte. 

Viele Einsteiger, die im Laufe des 
letzten halben Jahres den ersten Kon- 
takt mit der Programmiersprache Basic 
hatten, fragten nach einem praktischen 
Basic Kurs. Wir waren etwas überrascht, 
als man uns immer wieder sagte: „So 
etwas wie beim F. W. — nur eben ernst‘. 
Was unsere Leser damit meinten war 
klar; keine trockene Auflistung irgend- 
welcher Basic-Anweisungen mit dutzen- 
den Beispielen, die einzeln betrachtet 
gar keinen Wert hatten, sondern grund- 
sätzliches Wissen anhand eines einzigen 
Beispieles, welches mit dem Gelernten 
verbessert oder ergänzt werden kann. 
In diesem Sinn haben wir uns denn auch 
versucht. Eine Datei, die jeder gebrauchen 
kann, der überhaupt einen Computer 
besitzt, wird „auseinandergenommen“ 
und es gibt zu jeder Routine eine aus- 
führliche Erklärung. 

Mit den „Wie funktioniert ...“-Artikeln 
haben wir einmal ein Experiment gewagt. 
Wen hat es nicht als Kind schon einmal 
gereizt, einen Wecker auseinander zu 
nehmen um so zu erfahren, warum er 
tickt. Wenn man erst einmal seinen 
Computer bezahlen mußte, überlegt man 
sich derlei Bastelarbeiten zweimal. Die 
Diskette oder der Monitor sollen schließ- 
lich heil bleiben. Trotzdem bleibt man 
aber neugierig. Wir wollen Ihnen deshalb 
einmal das Innenleben einiger Geräte 
vorstellen, ohne gleich in Fachchinesisch 
zu verfallen. Mit einem Diskettenlauf- 
werk fangen wir an, geplant sind weiter 
Akkustikkoppler, der Monitor und der 
Drucker. Es sei denn, Sie erheben Ein- 
spruch. Aber aus unseren Telefongesprä- 
chen mit Ihnen haben wir immer wieder 
Ihr Interesse an solchen Grundlagen ent- 
nehmen können. 

Damit ist das Stichwort „Telefon“ 
gefallen. Sie werden es auch noch an 
anderen Stellen dieses Heftes lesen 
können, aber der Hinweis ist uns wichtig 
genug. Schneider aktiv ist wieder einmal 
umgezogen. Am Tag der Arbeit, dem 
1. Mai, packten wir unsere Hard- und 
Software unter den Arm und bezogen 
größere Büroräume. Sie sehen, damit 
unsere Arbeit für das Heft nicht leidet, 
sind wir auch bereit, einen Feiertag zu 
schänden. Da eine Umstellung durch die 


Post nicht so schnell erledigt wird (es 
ist und bleibt eben die Post), übernahmen 
wir einfach die vorhandenen Telefonnum- 
mern. Ab jetzt sind wir jeden Montag 
von 15.00 bis 19.00 Uhr (wie bisher) 
unter 089/188057 (neu) zu erreichen. 
Aber wie heißt es doch so schön: „Alles 


neu macht der Mai‘. So hat sich auch 
unser Postfach geändert. Wenn Ihre 
Leserbriefe in Zukunft die Aufschrift 
„Schneider aktiv, Postfach 1161, 8044 
Unterschleißheim‘ tragen, kommen sie 
garantiert an. 

Neu ist auch — und damit sind wir 
endlich wieder bei dieser Ausgabe — die 
Echo-Seite. Es ist Ihre Reaktion auf ganz 
bestimmte Themen in vergangenen Aus- 
gaben. Hier sollen Sie noch einmal zu 
Wort kommen, denn wir sind ja stolz 
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auf unsere Leser, die nicht alles kommen- 
tarlos schlucken, was Ihnen vor die Augen 
kommt. Meckern Sie also ruhig, wenn 
Ihnen der Artikel nicht paßt, oder wenn 
Sie zum angesprochenen Thema auch 
etwas zu bemerken haben. 

Ganz persönlich möchte ich auch 
noch die Gelegenheit nutzen und allen 
Autoren meinen Dank aussprechen. Die 
vergangene Zeit der Umstellungen und 
der Einarbeit forderte auch von den 
freien Mitarbeitern einiges an Geduld. 
Nun, wo wir aus der gröbsten Arbeit 
heraus sind, möchte ich Sie wissen 
lassen, wie sehr alle Redaktionsmitglieder 
Ihre Arbeit schätzen gelernt haben. 

Allen — Lesern und Autoren — wün- 
sche ich viel Spaß und Information bei 
der „dickeren‘“ Schneider aktiv. 


DIALOG 


Ärger mit 
Steuerzeichen 
Cricks ohne 
Fehl und Tadel 
Lob und Rat 
So bitte nicht 
Merkwürdige 
Zeichen 
Kunde als 
Melkkuh? 
Stoppt die 
Computer- 
mafia 


TEST & TECHNIK 


SPIELE: 

Big trouble: 
Nichts als 
Ärger wegen 
seiner Frau 


ab Seite 10 


ab Seite 4 
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Da würde sich selbst 
Agatha Christie 
die Zähne 
ausbeißen ab Seite 6 
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Welt — natürlich 

gegen die bösen 

Russen ab Seite 34 
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Das kennen 
Sie schon? 
Irrtum ab Seite 90 
Hive: 
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feindliche 
Mörderbienen 
greifen an! 


SOFT- & HARDWARE: 
Zusatzlaufwerke: 

Mal groß, 
mal klein, 
von Teac 


ab Seite 92 


ab Seite 8 


Schneider PC: 
Diesmal der 
Macro-Assembler, 
was er kann und 


was er leistet ab Seite 24 


G-Base: 
Eine PC- 
Datenbank, 
die es in 
sich hat ab Seite 26 
Mirage-Imager: 

Ein Kopier- 
schutzknacker — 

oder nicht? ab Seite 80 


Synthesizer: 
The Sound 


of Music ab Seite 85 


SERIE & SERVICE 


GEWUSST WIE: 
Disketten: 

So arbeitet 

eine Disketten- 

station ab Seite 14 


Handbuch: 
Handbuch 
zum Basic 2 
des Schneider 
PC unter 

der Lupe 


ab Seite 22 


Bezugsquellen: 
Wo man was 
erwerben 


kann auf Seite 23 


Maschinensprache: 
Programmieren, 


aber richtig ab Seite 28 
Turba-Pascal: 

Pascal der 

Superlative ab Seite 32 
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Turbografix: 
Fehler im 
Handbuch auf Seite 33 
Basic: 

Richtig 

programmieren 

— Planung und 

Aufbau einer 


Datei ab Seite 82 


Preise: 
Die Kunst, 
Kunden zu 


verärgern ab Seite 18 


Schule: 
Lernen per 


Computer? ab Seite 20 
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Was ist 
eigentlich mit 
gelöschten 
Files? auf Seite 37 
Hisoft: 
Musik nach 
Noten auf Seite 38 
Börse: 

Zum Suchen 
und Finden ab Seite 87 
FW: 

Geistige 

Ergüsse und 


Genüsse ab Seite 89 
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Transfer: 
Kopieren von 
Kassette auf 
Diskette — 
und 


umgekehrt ab Seite 39 


Zeitplan: 
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Ihren Termin- 
kalender, 
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all dies 
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Programm ab Seite 44 


Diagramm: 
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1000 Worte ab Seite 52 
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Widerstände, 
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ist was? ab Seite 55 


Tape-Time: 
Endlich exakte 
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Ihre Musik- 
aufnahmen ab Seite 59 
Türme von Hanoi: 

Der Klassiker, 
für den PC 
geschrieben ab Seite 61 
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Verschönern 
Sie ihre 
Briefe ab Seite 63 
Kalender: 
Einmal 
eingegeben, 
druckt Ihnen 
jedes 
gewünschte 
Jahr ab Seite 71 
Springer: 
Vorsicht vor 
den Ecken! ab Seite 75 
Hex-Bin-Wandler: 
Einfacher in 

Assembler 

pro- 


grammieren ab Seite 78 
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Karate, Kung Fu, asiatische Zauberei, dies waren schon immer sichere 
Mittel für einen Kinohit. Kult- und Star-Regisseur John Carpenter drehte 
mit diesen Mitteln seinen neuesten Film und hatte -- wie nicht anders zu 
erwarten -- Erfolg. Softwareproduzenten scheinen heutzutage bereits in 
der Vorbereitungsphase zum Film das Drehbuch zu bekommen, denn wie 
anders ist es zu erklären, daß sich fast zum Kinostart schon das Computer- 
spiel auf dem Markt befand. Solche Eile ist nicht immer zum Wohle des 
Käufers (wie ‚„‚Ghostbusters’’ bewies), und so fragt es sich, ob aus „Big 
Trouble in Little China’ nicht „‚Big Trouble im CPC’’ wurde. 


Damit sich das Weiterlesen lohnt, 

darf vorweg gesagt werden, daß der 
Versuch der Umsetzung gelungen 
ist. Nach der Spectrum- und C64- 
Version folgte die Adaption für die 
Schneider Computer und eine gut 
gelungene noch dazu. Graphik und 
Spielmotivation lassen kaum Wün- 
sche offen. Lediglich der Sound 
hätte etwas besser ausfallen können. 
Doch dazu später mehr. Zunächst 
einmal die Handlung des Program- 
mes: 
Der äußerst bösartige Mandarin Lo 
Pan muß einen Dämonen besänfti- 
gen, um einen menschlichen Kör- 
per zu bekommen. Der Dämon will 
für diesen Zweck ein Mädchen mit 
grünen Augen geopfert haben, was 
denn sonst? 

Die Anhänger von Lo Pan machen 
sich deshalb auf die Suche nach 
grünäugigen Mädchen und finden 
auch welche, nämlich Gracie Law 
und Miao Yin, die Freundinnen des 
Amerikaners Jack Burton und des 
Chinesen Wang Chi. Diese sind da- 
mit aber naturgemäß überhaupt 
nicht einverstanden und werden 
deshalb auch gar nicht gefragt. Ihrer 
besseren Hälfte beraubt, fackeln die 
beiden nicht lange und machen sich 
zusammen mit dem chinesischen 
Zauberer Egg Shen auf den Weg 
durch das Straßengewirr von China- 
town in San Francisco und dessen 
Abwasserkanäle zum Hauptquartier 
des bösen Mandarins. 

Der Weg führt in Hallen, die tief 
unter der Erde verborgen sind. Dort 
gilt es, Lo Pan ein für alle Mal zu 
besiegen. Eine Aufgabe, die sich 
leichter anhört als sie ist. Lo Pan 
verfügt nämlich über ganz enorme 
Kräfte der Selbstheilung und muß 
deshalb mehrmals getötet werden. 
Ist dies geschehen, gibt es ein Hap- 
py End und damit auch ein Wieder- 
sehen mit Gracie und Miao. 

Der Spieler steuert in diesem Spiel 


drei Figuren: Jack Burton, Wang 
Chi und Egg Chen. Die Spielfiguren 
bewegen sich von rechts nach links, 
d.h. sie stehen am rechten Bild- 
schirmrand schön hintereinander 
und der Hintergrund scrollt sauber 
je nach Bewegungsrichtung von links 
nach rechts, bzw. von rechts nach 
links. Die am weitesten links stehen- 
de Figur ist die aktuelle Spielfigur. 
Die anderen laufen brav und treu 
hinter dieser her. Den Weg ins 
Hauptquartier Lo Pans zu finden, 
ist ziemlich einfach. Da es nur die 
Bewegungsrichtungen vorwärts und 
rückwärts gibt, geht man einfach 
immer nur vorwärts (ist ja auch 
irgendwie logisch!). Spieler, die ein 
sehr lang andauerndes Spiel vor- 
ziehen, können aber selbstverständ- 
lich auch nach einiger Zeit wieder 
rückwärts gehen, sofern es ihnen 
mit der Befreiung der Damen nicht 
allzu sehr eilt. Die Zahl der Feinde 
wird dabei etwas größer, ihre 
Kampfstärke ändert sich aber nicht. 

Ach ja, die Feinde. Sie kommen 
dem Spieler in regelmäßigen Abstän- 
den entgegen. Je nach aktueller 
Spielfigur und ihrer Bewaffnung 
kann man den Feind erschlagen 
(Jack Burton ohne Waffe und Wang 
Chi ohne Waffe), erschießen (Jack 
Burton mit Waffe), erstechen (Wang 
Chi mit Säbel), durch Feuerblitze 
vernichten (Egg Chen ohne Zauber- 
trank) oder durch Magie vernichten 
(Egg Chen mit Zaubertrank). Die 
Waffen, also Zaubertrank, Schnell- 
feuergewehr oder Säbel, besitzen 
alle nur eine begrenzte Lebensdauer, 
daran sollte man denken, denn die 
Begegnung mit dem Überbösewicht 
steht ja noch bevor. 

Auch die körperliche Verfassung 
der Spielfiguren nimmt durch lange 
oder kurze Kämpfe mehr oder we- 
niger schnell ab. Manchmal stehen 
aber große Schüsseln mit Essen auf 
der Straße (ja, Sie haben richtig ge- 
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Ladebild von „Big Trouble ...‘ 
wenig Ähnlichkeiten mit den Filmhelden 
(oben) 


— Nur 


Der Magier darf schweben — Auf dem 
Weg zu den Geiseln (unten) 


lesen: mitten auf der Straße!). Es 
wird ein ewiges Rätsel bleiben, wer 
diese dort deponiert hat. Bewegt 
man nun eine Spielfigur darüber, so 
hat diese sofort wieder die volle 
Energie. Der Kalorienverbrauch, 
oder die Zufuhr derselben, wird üb- 
rigens am unteren Spielfeldrand 
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durch Yin und Yang Symbole dar- 
gestellt, die sich allmählich auflö- 
sen, um den Fortschritt der Zwangs- 
diät anzuzeigen. Wenn Sie eine Waf- 
fe entdecken, dann bewegen Sie die 
Spielfigur, die am besten damit um- 
gehen kann, darüber. Ein Bild dieser 
Waffe wird dann am Bildschirm an- 
gezeigt, zum Zeichen, daß sie sich 
im Besitz der Spielfigur befindet. 
Der Punktestand steht übrigens 
ganz unten am Bildschirm. Er ist 
allerdings für den Spielverlauf weni- 
ger von Bedeutung. 


TEST 


Kampf in den Chinatown: 
Gut gehüpft ist halb gewonnen 


Die ganze Mission unserer Helden 
ist in vier Stufen unterteilt. Erste 
Stufe: Die Straßen von Chinatown. 
Hier kommen einem „unbewaffne- 
te Experten der östlichen Kriegs- 
künste“ (laut Anleitung jedenfalls) 
entgegen. Die Kriegskünste beste- 
hen aber lediglich darin, daß sie vor 
der Spielfigur auf- und abhüpfen 
(man soll sich wohl krank lachen). 
Ein Kampf kann hier sehr lang 
werden, weil es schon mal etwas 
länger dauern kann, bis man diesen 
lebenden Gummibällen eins verpas- 
sen kann. 

Das tollste aber ist, daß manche 
wohl verständlicherweise keine Lust 
haben, sich verprügeln zu lassen. Sie 
hüpfen nach einigen bemerkenswer- 
ten Demonstrationen ihrer Sprung- 
kunst einfach wieder davon. Es 
kann aber auch passieren, daß 
einem ein schießwütiger Geselle be- 
gegnet. Ist man hier nicht schnell 
genug, hat man keine Chance mehr. 
In Stufe zwei wird die Sache dann 
schon ein bißchen schwieriger. Man 
bewegt sich hier durch die Abwas- 
serkanäle. Neben den zahlreichen 
„Experten der fernöstlichen Kriegs- 
künste‘ tauchen aus den Seitengän- 
gen manchmal gräßliche Monster 
auf, die allerdings unbesiegbar sind. 
Lo Pan hat anscheinend für alles 
gesorgt. In so einem Fall hilft nur 
ein großer und weiter Sprung der 
ersten Spielfigur. Dies scheint die 
Monster derart zu verblüffen (viel- 
leicht amüsieren sie sich auch über 
diese ständige Hüpferei), daß sie 
den nachfolgenden Kameraden 
nicht an den Kragen wollen. 

Die dritte Stufe ist dann das 
Hauptquartier von Lo Pan. Hier be- 
gegnen einem die sogenannten 
Sturmtruppen Lo Pans. Sie besitzen 
— der Springerei nunmehr müde ge- 
worden — fast alle ein Gewehr. Ein 
weiteres Merkmal sind ihre bereit- 
krempigen Hüte ( so echt chine- 
sisch!). Hat man sich auch hier vor- 
beikämpfen können, gelangt man in 
Stufe vier, die letzte und auch 
schwerste. 

Hier werden die meisten von 
Ihnen scheitern und man kann es 
sich als Ehre anrechnen, bis hierhin 
vorgedrungen zu sein. Aber Kneifen 
gilt nicht, denn es geht ja immer 
noch um die Befreiung der grün- 
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äugigen Damen. Zuerst wird man 
von Sturmtruppen mit einer kräfti- 
gen Gewerhrsalve empfangen. Da- 
nach lernt man den großen Lo Pan 
persönlich kennen. Er schwebt auf 
einer geheimnisvollen Wolke auf die 
Helden zu, die es gewagt haben, in 
sein Reich einzudringen. Da er, wie 
schon am Anfang erwähnt, über die 
enorme Kunst der Selbstheilung 
verfügt und mit den besten Waffen 
ausgerüstet ist, bedarf es schon eini- 
ger Mühe, ihn zu besiegen. Welche 
Waffen er besitzt, soll hier nicht er- 
wähnt werden, um die Spannung 
nicht vollends zu nehmen. In Sa- 
chen „Fernöstliche Kampftechni- 
ken“ werden Sie allerdings einiges 
dazulernen können. 


Grafik und „Action’ gut pro- 
grammiert und der Preis stimmt auch 


Das ganze Spiel weist durchgehend 
saubere Graphik und ein butterwei- 
ches Scrolling auf. Die Spielmotiva- 
tion ist für einen normalen Com- 
puterfreak schon sehr hoch, vor- 
ausgesetzt, man akzeptiert die ver- 
rückte Geschichte mit einem klei- 
nen Augenzwinkern. Der phantasie- 
vollen Story ist es zu verdanken, 
daß man auch einmal ohne schlech- 
tes Gewissen an die ‚Ballerfans“ 
denken darf, für die das Spiel ein 
wahrer Genuß ersten Grades sein 
dürfte. Der Sound hätte etwas 
besser ausfallen können, ist aber 
durchaus ausreichend. Der Preis 
von etwa 30 Mark für die Kassette 
bzw. 45 Mark für die Diskette ist 
durchaus angemessen. Man bereut 
den Kauf nicht. 


Fazit: Als Spiel schon gut, in der 
Gruppe der Filmumsetzungen 
hervorragend 


Eine Leinwandumsetzung, die aus- 
nahmsweise sehr gut gelungen ist 
und sowohl für Ballerfans auch als 
für etwas ernstere Computerfreaks, 
die ab und zu mal ein Spielchen wa- 
gen, geeignet ist. Für Hektiker und 
solche, bei denen es schnell gehen 
muß, ist es wohl nicht das richtige, 
da das Spiel eher gemütlich abläuft 
und ein klein bißchen Strategie 
schon notwendig ist. Bei diesem 
Programm stört es ausnahmsweise 
einmal nicht, wenn man den Film 
gesehen hat. Das Abenteuer im 
Computer hält sich an das Original 
und reizt zum Eingreifen. (TB) 


TEST 


AGATHA CHRISTIE 

HATTE BEI DIESEM SPIEL 
PROBLEME: MURDER ON 
THE ATLANTIC 


Software zum Sammeln — So lautete eine Forderung von Schneider 


aktiv, die den Kopierschutz überflüssig machen würde (5/87). Wir hätten 
damals schon gerne auf „Murder on the Atlantic’ hingewiesen, aber 
das Kriminalspiel ist brandneu. Hier wurden genau jene Kriterien beher- 
zigt, mit denen beide Seiten — Anwender und Softwareverlage — leben 
können. Der Knüller von Infogames ist nicht kopiergeschützt und doch 
wird wohl jeder das Originalprogramm kaufen. 


Schon das Äußere der Verpackung 
dieses neuen Spiels deutet auf 
das Außergewöhnliche hin. Die 
Diskette befindet sich nicht in 
einer sonst üblichen billigen Pla- 
stikverpackung, sondern in einer 
stabilen Mappe in DIN A4-Größe, 
die mit einem Leinengürtel ver- 
schlossen ist. Die modische Wei- 
terverwendung des letztgenannten 
Utensils setzt allerdings eine Wes- 
pentaille voraus. Trotzdem sollte 
jeder die Verpackung genau (!) 
untersuchen und seinen kriminali- 
stischen Scharfsinn walten lassen. 
(Mehr sei hier nicht verraten). 


Reichhaltige Unterlagen 
für Hobbykriminalisten 


Die Überraschung wird noch 
größer, wenn man diese Mappe 
dann aufmacht. Denn da befin- 
det sich nicht nur die Diskette, 
bzw. Kassette drin, sondern man 
findet auch noch andere Sachen: 
eine Patronenhülse, ein Stück Mi- 
krofilm, eine Karte in Blinden- 
schrift, einem Geheimcodebrief, ein 
Foto einer Pistole, ein Streichholz, 
ein Knopf, ein Stück Bindfaden, 
eine Füllerpatrone, ein anonymes 
Telegramm, eine Passagierliste, di- 
verse Fotos, verschiedene Briefe, 
ein Exemplar der Zeitung „Le 
Courier“, einige Visitenkarten, ein 
Schiffsplan und Notizen. 

Zuerst wird man sich sicherlich 
wundern, denn dieses Zubehör ist 
für ein Computerspiel ungewöhn- 
lich. Aber wenn man dann ‚„Mur- 


Das Titelbild (oben) 


Spielablauf in drei Windows 


der on the Atlantic“ einlädt, be- 
merkt man bald, daß alle Utensi- 
lien als Beweisstücke doch benö- 
tigt werden. 


Die Vorgeschichte: 
Ein schändliches Verbrechen 


Sie befinden sich an Bord eines 
der größten, luxuriösesten, schnell- 
sten und modernsten Postschiffe 


Superschiff, die „Bourgogne‘, das 
sogenannte Blaue Band für einen 
neuen Geschwindigkeitsrekord auf 
der Strecke Europa—Amerika. Die- 
ses Schiff protzte vor Luxus, war 
aber auch technisch seiner Zeit 
voraus, denn es hatte als erstes 
seiner Art das gerade neuerfun- 
dene Radar an Bord. 

Und auf diesem Schiff ereig- 
net sich eine merkwürdige Ge- 
schichte (die ist allerdings wieder 


frei erfunden). Sie beginnt mit 
einer Leiche. Doch nirgends findet 
sich eine Spur, die auf den Mörder 
hinweist. Jedes Mitglied dieser so 
illustren Gesellschaft, die sich an 
Bord befindet, kann es gewesen 
sein. Und Sie sind der Detektiv, 
der diese mysteriöse Geschichte 
aufdecken und den Mörder fin- 
den sowie Licht in das Dunkel 
dieser ganzen Geschichte bringen 
wird. 


Das Spiel: Detektivischer 


der dreißiger Jahre. Dieses Schiff Scharfsinn ist gefragt 


gab es tatsächlich und gehörte 
damals der Compagnie Generale 
Transatlantique. Bei seiner ersten 
Atlantiküberquerung errang dieses 


6 


Bevor Sie das Spiel starten, soll- 
ten Sie sich die 40 Bilder der in 
Frage kommenden Personen aus 


a —————————— 


dem beigefügten Zettel ausschnei- 
den und jedes Bild dann so auf 
mehrere Zettel kleben, daß Sie 
sich ständig Notizen zu den Aus- 
sagen, Verhören, Ergebnissen und 
was Ihnen noch so wichtig er- 
scheint, notieren können. Denn 
dieses Spiel ist eine Kombination 
aus Adventure, Grafik-Aktion, 
Tisch-Spiel und Kombinationsfähig- 
keit. 

Nachdem Sie dann aber das Spiel 
gestartet haben, sehen Sie nach 
dem Titelbild das Schiff in der 
Seitenansicht vor sich. Ein klei- 
ner blinkender Punkt im unter- 
sten Deck zeigt Ihnen an, wo Sie 
sich gerade befinden. Diesen Punkt 
können Sie mit den Cursortasten 
nach rechts oder links bewegen. 
Eine erdrückende Vielzahl an Ka- 
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soll hier nicht verraten werden, 
denn Sie sollen ja diesen Fall 
lösen. 

Anfangs erscheint Ihnen manches 
sicherlich verwirrend und wenig 
logisch, aber je weiter Sie mit 
Ihren Ermittlungen vorwärts kom- 
men, desto klarer wird alles. Dazu 
gehören allerdings Phantasie und 
Kombinationsgabe. 

Wenn Sie jetzt von einem Deck 
aufs andere wechseln wollen, gehen 
Sie zurück zum Fahrstuhlschacht 
und rufen mit der Pfeil-Taste den 
Lift, der Sie nach Eingabe des 
gewünschten Decks dorthin trans- 
portiert. 

Bei solch einer Mammutarbeit 
ist gelegentlich eine Pause not- 
wendig und die Speicherung des 
Spielstandes muß möglich sein. 


Dazu er- 
scheint in einem Window die 
Bezeichnung des Raumes, in dem 
Sie sich gerade aufhalten. 

Wollen Sie sich dann in diesem 
Raum umsehen, müssen Sie die 
Copy-Taste drücken, und das Bild 
des Raumes erscheint. Nun haben 
Sie die Möglichkeit, diesen Raum 
zu durchsuchen (Taste D). Und 
so geht es dann weiter, Sie durch- 
suchen Raum für Raum. Treffen 
Sie einen Passagier oder ein Mit- 
glied der Mannschaft an, so können 
Sie ihn verhören (Taste V). Und 
das, was das Verhör dann ergibt, 
ist mitunter wichtig für den Fort- 
gang der Ermittlungen. Aber zuviel 


binen warten auf Sie. 


Wenn Sie nach einiger Zeit also 
mit den Ermittlungen zunächst 
aufhören wollen und das Programm 
mit der Escape Taste abbrechen, 
werden die bis dahin ermittelten 
Fakten abgespeichert. Beim näch- 
sten Benutzen des Programmes 
beantworten Sie die Frage, ob 
der Stand der Ermittlungen ge- 
laden werden soll, mit ,„J“, die 
alten Daten werden eingelesen und 
Sie können mit Ihren Ermittlun- 
gen fortfahren. 

Insgesamt enthält die Diskette/ 
Kassette mehr als 60 Programme 
und Dateien, so z. B. die Datei 
„Ermittlungsstand“, „Auswertungs- 
test“, „Zeugenaussagen“ sowie die 
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digitalisierten Bilder der vierzig 
Personen, die für den Fortgang 
der Geschichte vonnöten sind. 
Wir kennen zwar nicht die Kas- 
settenversion, aber bei der Viel- 
zahl der Dateien möchten wir 
von vornherein zur Diskette raten. 


Das Programm: Ausgezeichnete 
Grafik und deutsche Handlung 


Die Bildschirmgrafik mag viel- 
leicht auf den ersten Blick etwas 
enttäuschen, denn man sieht im 
wesentlichen nur den Querschnitt 
des Schiffes. Wer einen kleinen 
optischen Anreize benötigt, sollte 
entweder so schnell wie möglich 
anfangen zu spielen oder er sollte 
sich die Demoversion auf der 
B-Seite der Diskette anschauen. 
In jedem Fall werden die Bilder 
ständig besser und sind nur zu 
loben. Teilweise ist gleichzeitig der 
Schiffsplan, das Portrait einer Per- 
son und ein Bild des Raumes zu 
sehen. Neben dem wichtigen Text, 
versteht sich. 

Dabei wurde großer Wert auf 
den Stil der Zeichnungen gelegt. 
Wie im Handbuch versprochen, 
bemühte man sich die Stimmung 
des Art Deco der Moderne. Marie- 
Anne Allison hat dafür Original- 
fotos als Vorlage benutzt. Die 
ausgezeichnete Qualität der Arbeit 
kann hier nur bestätigt werden. 
Für die Portraits der Personen 
digitalisierte man von vornherein 


Fotos, eine Mühe, die sich aus- 
zahlte. 
Fazit: Neue Art der Software 


Ein Spiel völlig neuer Art mit 
sehr guter Grafik und faszinieren- 
der Spielidee. Die Programmierer 
haben ihr ganzes Können einge- 
setzt, um ein wirklich neuartiges 
und interessantes Spiel zu pro- 
grammieren und nicht, um einen 
Kopierschutz einzubauen, der das 
Herstellen von Sicherheitskopien er- 
schwert oder unmöglich macht. 
Aber wir sind sicher, daß „Murder 
on the Atlantic“ auch im Origi- 
nal von vielen Usern gekauft wird, 
denn für die meisten wird auch 
der Besitz des Zubehörs wichtig 
sein. 

Vielleicht ist dies auch für die 
anderen Software-Verlage eine 
Überlegung wert. (JE) 


Die 
puterSchau in Dortmund 
war ein idealer Zeitpunkt 


Hobbytronic/Com- 


für Besucher, die sich 
Zusatzhardware für ihre 
CPCs besorgen wollten: 
Günstige Angebote in 
Hülle und Fülle. Auch ich 
war auf der Suche nach 
weiterer Hardware und 
zwar ganz speziell auf 
der Suche nach Zusatz- 
laufwerken für die CPCs 
und auch für die Schnei- 
der PCs. Wie es der Zu- 
fall wollte, kam ich bei 
einem meiner „Suchgän- 
ge‘ auch bei der Firma 
Vitalliı & Strauß vorbei, 
über deren DISKPARA 
wir im Heft 2/87 berich- 
tet hatten. V&S bot ne- 
ben dem schon erwähn- 
ten Programm auch ver- 
schiedene Diskettenlauf- 
werke an und so ent- 
schied ich mich (auch 
aufgrund des günstigen 
Preises) ganz spontan 
zum Kauf von zwei 
TEAC-Laufweken. 

Das eine Laufwerk, das 
ich auswählte war ein 
5,25-Zoll-Laufwerk mit 
der Typenbezeichnung 
FD-55GFC-17. Das zwei- 
te ein 3,5-Zoll-Laufwerke 
mit der Bezeichnung FD 
35 FN-04/23. 


1,6 MByte Speicherplatz 


Zuerst nähere Informa- 
tionen zu dem von mir 
gewählten 5,25-Zoll- 
Laufwerk. Es handelt 
sich dabei um eine Disket- 
tenstation, die eine Maxi- 
malkapazität von 1,6 
MByte „fahren“ kann. In 
dieser Weise wird es bei- 
spielsweise in AT-Compu- 
tern betrieben. Bei die- 
sem Betrieb wird mit 
einer Diskettenumdre- 
hungsgeschwindigkeit 
von 360 Umdrehungen 
pro Sekunde gearbeitet, 
die Daten-Transfer-Rate 
liegt dann bei 500 Kbit/ 
sec. Ein anderes 5.25- 
Laufwerk (ohne diese 
Möglichkeit) wäre zwar 


TEST 


ZUSATZLAUFWERKE 
AM CPC 


Nachdem wir im Heft 1/66 schon das Programm 
Diskpara in Verbindung mit einem Vortex-Laufwerk 
getestet hatten, war für uns natürlich auch interessant, 
inwieweit sich auch andere Laufwerke an einen CPC 
anschließen und sowohl mit Diskapara als auch mit 
dem vVortex-Controller betreiben lassen. Hierzu 


wählten wir zwei Laufwerke der Firma TEAC aus. Ob 
es dabei Probleme gab, erfahren Sie in diesem Artikel. 


etwas preisgünstiger ge- 
wesen, aber irgendwann 
habe ich ja doch mal 
einen IBM-AT (oder AT- 
Kompatiblen) und dann 
kann ich dieses Laufwerk 
bestimmt gut gebrau- 
chen. 

Für den Einsatz in Ver- 
bindung mit einem CPC 
sollte es aber mit 300 
Umdrehungen pro Minu- 
te arbeiten, wodurch 
dann eine Maximalkapa- 
zität von 1 Megabyte 
unformatiert: vorliegt; die 
Daten-Transfer-Rate ist 
für diesen Betriebsmode 
mit 250 KBit/sec ange- 
geben. Evtl. wäre es zwar 
möglich, auch bei den 
CPCs mit 1,6 MByte zu 
arbeiten, dies habe ich 
aber noch nicht weiter 
untersucht. Ich vermute 
vor allem Probleme bei 
der Datenübertragungsge- 
schwindigkeit, aber wie 
erwähnt, ich weiß es 
nicht sicher. 


Keine Formatprobleme 


Das Laufwerk besitzt 
zwei eingebaute Schreib-/ 
Leseköpfe und arbeitet 
dadurch normalerweise 
mit zweimal 80-Spuren 
(= 160 Spuren). Die reel- 
le Kapazität der Diskette 
ergibt sich durch das ver- 
wendete Format und das 
können unter CP/M sehr 
viele und sehr unter- 
schiedliche sein. Damit 
Sie aber eine Vorstellung 
davon haben, welche 
Kapazitätsgröße erreicht 
werden kann, sei ange- 
führt, daß beispielsweise 
mit dem Programm 
DISKPARA bis zu maxi- 
mal 840 KB eingestellt 


Bild 1: „Enthüllte”” 3 Zoll 
Diskette. 

Bild 2: Das gesamte Innenle- 
ben der Diskettenstation. 
Oben der größere Antriebs- 
motor, unten der Schrittmo- 
tor für den Lesekopf. 


Bild 3: Detailaufnahme des 
Lesekopfes (Mitte), dahinter 
der Antriebsmotor, unten 
links der Schrittmotor. 


werden können. In Ver- 
bindung mit dem VOR- 
TEX-X-Modul erhalten 
Sie eine ‚benutzbare 
Kapazität von 704 (720) 
KByte. 

Was mußte aber getan 
werden, bis das Laufwerk 
in Verbindung mit einem 
CPC eingesetzt werden 
konnte? Vorhanden war 
nur das „nackte“ Lauf- 
werk, also ohne Gehäuse, 
Netztel und Verbin- 
dungskabel. Für den er- 
sten Test mußte deshalb 
das Netzteil der Vortex- 
Station herhalten. Das 
hatte den Vorteil, daß 
bereits der Busstecker 


Diskpara als Helfer 


mit dem entsprechenden 
Verbindungskabel vor- 
handen war. Meine Ar- 
beit beschränkte sich al- 
so auf das Öffnen der 
Vortex-Station und den 
korrekten Anschluß des 
Laufwerkes. Als Verbin- 
dung waren also das 
Kabel für die Versor- 
gungsspannungen sowie 
das Buskabel anzuschlie- 
ßen. Damit war das Pro- 
blem des Anschließens 
gelöst. Vorher hatte ich 
noch die Jumper (Kurz- 
schlußbrücken für ver- 
schiedene Laufwerkskon- 
figurationen) überprüft 
und eingestellt. 

Gespannt schaltete ich 
den CPC ein und (wer 
hat etwas anderes erwar- 
tet?) alles funktionierte 
so, wie ich es erwartet 
hatte: Das Laufwerk ar- 
beitet mit dem Vortex- 
Controller ohne Proble- 
me. Auch die weiteren 
Tests in Verbindung mit 
dem Programm DISK- 
PARA (ohne angeschlos- 
senen Vortex-Controller) 
zeigten keinerlei Pro- 
bleme auf. Normalerwei- 
se hätte ich nun nur noch 
ein _Laufwerksgehäuse 
und ein entsprechendes 
Netzteil besorgt und alles 
zusammengebaut und 


TEST 


ZUSATZLAUF- 
WERK AM CPC 


Bild 4: Innenleben des Controllers. Mit ICs bestückte Pla- 
tine. Größter Baustein direkt unter der Steckerleiste ist das 
32 KByte ROM. 


hätte damit — ohne Con- 
troller — in Verbindung 
mit DISKPARA ein voll- 
wertiges zweites Lauf- 
werk für den Betrieb 
unter CP/M gehabt. Da 
dieses Laufwerk bei mir 
aber für den Schneider 
PC und später evtl. für 
eine AT-Maschine vor- 
gesehen ist, habe ich in 
dieser Richtung keine 
Aktivitäten unternom- 
men. Sinn dieses Tests 
war nur, Ihnen mitzu- 
teilen, ob es klappt! 


Das 3,5-Zoll-Laufwerk 


Dieses Laufwerk besitzt 
ebenfalls zwei Schreib- 
Leseköpfe und kann auch 
zweimal 80 Spuren ver- 
arbeiten. Dadurch ist auch 
bei diesem Laufwerk eine 
Kapazität von einem 
Megabyte (unformatiert) 
gegeben. 

Der Hauptunterschied 


zum vorherigen 5,35- 
Zoll-Laufwerk ist vor al- 
lem die Diskettengröße 
von 3,5-Zoll, die sich in 
der letzten Zeit vor allem 
bei den PCs immer mehr 
durchsetzt. Aber auch bei 
CPC-Besitzern hat dieses 
Format schon einige An- 
hänger gefunden, vereint 
es doch große Speicher- 
kapazität mit guter Ro- 
bustheit der Disketten. 
Auch zu diesem Test 
wurde anfangs das Netz- 
teil der Vortex-Station 
mißbraucht. Allerdings 
konnte der Anschluß 
nicht so einfach durchge- 
führt werden, denn der 
Anschlußstecker für die 
Spannungsversorgung 

und auch der für den Bus- 
anschluß paßten nicht. 
Deshalb war ein spezielles 
Kabel nötig. Für die Bus- 
verbindung bestellte ich 
bei V&S ein fertig-kon- 
fektioniertes Kabel, für 
die Versorgungsspannun- 
gen den hierfür nötigen 
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Stecker. Da ich vorhatte, 
dieses Laufwerk zusam- 
men mit einem Netzteil 
in ein kleines Gehäuse 
einzubauen, folgte auf 
diese Bestellung auch 
noch die für das Gehäuse 
und Netzteil. Zum Test 
wurde aber die Span- 
nungsversorgung in Frei- 
luftverdrahtung durchge- 
führt. 

Auch dieses Laufwerk 
funktionierte sofort und 
dies sowohl mit dem 
Vortex-X-Modul als auch 
mit Diskpara. Nachdem 
auch dieser Test positiv 
war und nachdem ich 
auch meine Versuche am 
Schneider PC durchge- 
führt hatte, stand einem 
Einbau aller Komponen- 
ten in das Gehäuse nichts 
mehr im Wege. Sicher 
hätte ich bei V&S auch 
die fertigen Laufwerke 
bestelen können, also 
inklusive Gehäuse, Netz- 
teil und Kabel, aber ich 
hätte diese Laufwerke ja 
trotzdem zerlegen müs- 
sen, da sie auch im PC 
getestet werden sollten. 


Fertig nach 30 Minuten 


Der Zusammenbau war 
innerhalb von ca. 30 
Minuten durchgeführt 
und alles klappte auf An- 
hieb. Ich verfüge damit 
nun über die Möglichkeit, 
alle derzeit üblichen 
Diskettenformate lesen 
und schreiben zu können 
und mein CPC 6128 hat 
bisher klaglos alle meine 
Experimente überstan- 
den. 

Wenn man die derzei- 
tigen Preise der angebo- 
tenen Laufwerke sieht, 
kann man nur sagen, die 
Erweiterung des CPCs 
mit einem MegaByte- 
Drive ist sicherlich eine 
sehr sinnvolle und preis- 
werte Aufrüstung, egal 
ob im 5,25- oder 3,5 
Zoll-Format. 
(LM) 


WIR ÜBER UNS 
HOHER BESUCH 


Eines Tages kam eine gute 
Fee zu unserer Programmre- 
daktion und fragte nach den 
üblichen drei Wünschen, wo- 
bei sie vorsorglich den An- 
spruch auf Erfüllung nicht 
garantieren wollte. Tatsäch- 
lich hörte sie nur kurz zu und 
verschwand dann mit den 
Worten: „Das geht mich 
nichts an“. 

An dieser Stelle wollen 
wir deshalb einmal etwas 
über die Wünsche der Pro- 
grammredaktion schreiben, 
die ansonsten zuwenig Kon- 
takt mit den Lesern hat. 
Es geht natürlich um die 
Programmeinsendungen. 

Nach einer strengen, aber 
wohlmeinenden Prüfung er- 
hält der Autor eventuell die 
entsprechende Nachricht (... 
wird in einer der nächsten 
Ausgaben ...) und darf der 
Dinge harren, die da kom- 
men. Einige Programmierer 
sind darüber aber so erfreut, 
daß sie sich sofort noch 
einmal an den Computer 
begeben und eine Verbesse- 
rung programmieren. Und 
wenn die dann endlich bei 
uns ist kann es sein, daß 
das Listing schon längst für 
den Fotosatz aufbereitet und 
eine nachträgliche Änderung 
nicht mehr möglich ist. Är- 
gerlich ist dies für alle Be- 
teiligten. Der Autor möchte 
ja mit seinem besten Können 
repräsentiert werden, und un- 
sere Programmredaktion steht 
verzweifelt vor einer Neuauf- 
lage und weiß nicht, was 
sie damit anfangen soll. Also: 
Wenn Ihnen eine Verbesse- 
rung zu Ihrem Programm ein- 
fällt, dann eilt es. Schicken 
Sie uns Ihre Ideen auch dann 
schon zu, wenn Sie zu Ihrem 
Programm noch keine Ant- 
wort erhalten haben. Ände- 
rungen, die uns vielleicht zu 
spät erreichen könnten, sen- 
den Sie bitte nicht in Form 
eines neuen Programmes, son- 
dern als Brief, in dem Sie 
die betreffenden Zeilen auf- 
listen und die Korrektur vor- 
schlagen. Diesen Brief können 
wir dann immer noch, auch 
in größter Eile, auf den Dia- 
log-Seiten unterbringen. 

Der zweite Wunsch betraf 
die REM-Zeilen. Meistens 
sind diese ja recht hübsch 
gemacht und mit vielen Stern- 
chen zum eigentlichen Kom- 
mentar versehen, aber leider 


in einem 80 Zeichen/Zeile 
Modus. Wir drucken aber 
der Übersichtlichkeit halber 
mit 40 Zeichen je Zeile 
und dabei wird jeder noch 
so schöne Text zerstört. Dar- 
aus folgert: Wenn schon der 
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wenn es mal nicht so klappt 
wie geplant. Ein aktuelles 
Beispiel war auch gegeben, 
die Softbox für das Spezial- 
heft 2/87. Und da wollen 
wir mal erzählen, wie unser 
„Iape“ so gemacht wird, 
damit eben ein wenig mehr 
Geduld aufkommt. Außer- 
dem gibt es noch einen Tip, 
was zu machen ist, wenn 
sich die Lesefehler bei einem 
Programm häufen. 

Zuerst einmal geben wir — 
kurz nach Redaktionsschluß 


WICHTIG: Neues Postfach 


Die Redaktion von Schneider aktiv besitzt ab so- 
fort ein neues Postfach. Unsere korrekte Anschrift 


für Leserbriefe lautet: 
Schneider aktiv 
Postfach 11 61 


8044 Unterschleißheim 


WICHTIG: Neue Telefonnummer 


Wir sind wieder einmal umgezogen. Diesmal 
allerdings nur in größere Büroräume. Unsere Hot- 
line für Fragen und Kritik (montags von 15.00 
bis 19.00 Uhr) ist jetzt mit der Nummer 089 / 


188057 zu erreichen. 


Kommentar — der ja eigent- 
lich schon ausreicht — hinter 
einem REM mit Sonderzei- 
chen verziert wird, dann soll- 
te der 40-Zeichen Modus be- 
rücksichtigt werden. 

Dritter und letzter Wunsch 
(mehr wollte die gute Fee 
nicht genehmigen) unserer 
Programmredaktion betrifft 
die Bedienungsanleitung. Die- 
se besteht häufig genug nur 
aus dem Satz: „Dieses Pro- 
gramm erklärt sich von allei- 
ne“. Vielleicht liegt es auch 
an unserem mangelnden Ver- 
ständnis, aber meist ist es 
damit nicht getan. Ein paar 
erläuternde Sätze zur Pro- 
grammführung würden ja rei- 
chen, um uns die Arbeit 
wesentlich zu erleichtern. 
Außerdem können wir dann 
besondere Kniffe des Autors 
an unsere Leser weitergeben 
und allen wäre geholfen. 
Zum Begleittext gehört auch 
der Lösungsweg eines Ad- 
ventures, damit wir das ganze 
Programm auf seine Lauf- 
fähigkeit untersuchen können 
und nicht später der Leser 
enttäuscht wird. 

Da die die gute Fee nun 
einmal da war, besuchte sie 
auch gleich unseren Kasset- 
tenservice. Hier gab es nur 
einen Wunsch, nämlich den 
nach etwas mehr Verständnis, 


— eine Masterkassette in das 
Kopierwerk. Bezieher der 
Softbox werden sich erin- 
nern, daß auf der letzten 
Spezial einige Binärfiles war- 
ren und gerade die führten 
zur ersten Reklamation. An- 
ruf bei uns: „Wie bekommt 
man Binärfiles in den Com- 
puter?“. Man muß dazu sa- 
gen, daß es sich hier um ein 
professionelles Kopierwerk 
für die schönsten Musikauf- 
nahmen handelt, aber ein 
Programm ist schließlich 
nicht Beethovens Fünfte. Die 
vom Werk erstellte Kopie 
kommt dann zu uns und 
wird geprüft. Ist sie einwand- 
frei (diesmal war sie es) 
geht sie sofort zurück und 
darf für die Massenproduk- 
tion benutzt werden. Die 
wird dann geliefert und mit 
einigen Stichproben geprüft. 
Um beim Beispiel zu blei- 
ben: Die Einzeltests verlie- 
fen negativ, keine Reaktion 
im CPC. Nach der Rücksen- 
dung der Ware kam ein 
empörter Anruf vom „Ober- 
chefkopierer“; am CPC der 
Firma funktionieren die 
„Dinger“ ausgezeichnet. Ein 
paar Nachfragen brachten 
Klarheit: 

Das Kopierwerk benutzt 
einen CPC 6128 mit einem 
zusätzlich angeschlossenen 
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Tapedeck. Dieser Rekorder 
ist sicher um einiges besser 
als unserer im CPC und 
so war es nicht verwunder- 
lich, daß die Programme im 
etwas schlechteren CPC-Gerät 
nicht ladbar waren. Zudem 
haben wir die Lieferung der 
Softbox mit einem Rechner 
getestet, dessen Tonkopf ab- 
sichtlich schlecht justiert war; 
denn was sich damit ein- 
lesen ließ, das würde wohl 
auch von einem korrekten 
Recorder akzepiert werden. 
Kurz und gut: Wir haben 
ein zweites Mal ein paar 
Stichproben gezogen, den Le- 
sekopf besser eingestellt und 
nun liefen die Programme 
auch bei uns. Auf dem 
gleichen CPC testeten wir 
dann die „normalen‘ Han- 
delskassetten — Hacker II, 
Hive, MGT und andere mehr 
— die ebenfalls leicht einzu- 
lesen waren. Wir gehen also 
davon aus, daß der Rekor- 
der, den Sie zu Hause haben, 
unsere Softbox ohne Bean- 
standung „schluckt“. 


Sie sehen also, bei diesem 
Aufwand kann es natürlich 
auch mal zu Verzögerungen 
kommen, obwohl nirgendwo 
die Arbeit liegen bleibt. Auch 
ist im Grunde genommen 
niemand daran schuld, denn 
wir und das Kopierwerk wol- 
len ja nur gute Qualität 
abliefern. Wenn Sie einmal 
Lesefehler haben — es kön- 
nen auch Programme anderer 
Herkunft sein — dann ju- 
stieren Sie doch einfach ein- 
ınal den Tonkopf des Re- 
korders. Als Werkzeug be- 
nötigen Sie nur einen klei- 
nen Schraubenzieher und Ihr 
Ohr. Bei geschlossenem Kas- 
settendeckel finden Sie am 
CPC eine kleine viereckige 
Öffnung. Gerade darunter be- 
findet sich die Justierschrau- 
be. Wenn Sie ein Programm 
einladen, dann können Sie 
nach dem CAT-Befehl oder 
dem Startbefehl bei aufge- 
drehten Lautsprecher einen 
Ton hören. Versuchen Sie 
die beste Lautstärke heraus- 
zufinden. Wenn Sie Ihren 
Ohren nicht trauen wollen, 
dann arbeiten Sie jeweils in 
Viertelumdrehungen, warten 
den nächsten Block ab (also 
langes Programm benutzen) 
und verändern um eine wei- 
tere Viertelumdrehung, wenn 
dieser Block nicht gelesen 
werden konnte. 

Für diese Ausgabe war der 
„Wir über uns“-Bericht recht 
lang. Aber es kommt ja 
auch nicht alle Tage vor, 
daß in unserer Redaktion 
eine gute Fee zu Besuch 
weilt. 


———————————————————————————————————— 


FensterIn mit 


Basic 2 auf 

dem PC 

In o. a. Artikel greifen 
Sie unter u. a. Probleme 


mit dem BASIC2 des Schnei- 
der PC auf, ebenso die 
mitunter merkwürdige Art 
und Weise, in der sogenannte 
„Testberichte“ entstehen. Ich 
muß gestehen, Sie haben 
mir in weiten Teilen aus 
der Seele gesprochen. 

In einigen Dingen würde 
ich sogar noch weitergehen. 
So bin ich zum Beispiel 
der Meinung, daß all die 
guten Seiten von BASIC2 
die teilweise gravierenden 
Mängel nicht aufheben. So 
ist z. B, die auch von Ihnen 
erwähnte Bildschirmausgabe 
beschämend langsam, daß 
man nur vor Neid erblassen 
kann, wenn andere von z. 
B. Animation unter Basic 
erzählen. Zu den von Ihnen 
erwähnten Benchmarktests 
braucht man mit dem Schnei- 
der PC gar nicht anzutreten, 
wenn im Testprogramm eine, 


PRINT-Anweisung vor- 
kommt. Sobald der Bild- 
schirm vollgeschrieben ist, 
vervielfacht sich die Aus- 


führungszeit durch das Scrol- 
len. Wenn ich mir die Er- 
gebnisse von Benchmarktests 
in einigen „Fachzeitschrif- 
ten‘‘ ansehe, frage ich mich 
immer wieder: Wie haben 
die das gemacht? Oder haben 
die vielleicht einen anderen 

PC? 

Das Ganze wäre ja even- 
tuell noch tragbar, wenn man 
sich eigene Maschinen-Routi- 
nen schreiben und unter 
BASIC2 benutzen könnte, 
aber nein, offenbar hält man 
es für unmöglich, daß je- 
mand, der Programme in 
Basic schreibt, auch mit Ma- 
schinensprache umgehen 
kann und verzichtet auf jede 
Möglichkeit des Zugriffes auf 
der Maschinenebene. 

Weitere Mängel in Kurz- 
form: 

— Listmöglichkeit nur für 
ganze Programme (Vertrag 
mit der Papierindustrie?). 

— Kein getrennter Befehl 
zum Einstellen des Druk- 
kers (da der mitgelieferte 
Druckertreiber nur be- 
stimmte Drucker unter- 
stützt, wäre dies ja wohl 
möglich gewesen). 

— Vorhandene, aber nicht 
lauffähige Befehle werden 
im Handbuch erwähnt, als 
ob sie liefen (FI, CASE, 


CEND, PROC, PEND 
u. a.). Auffallend, daß 
es sich um Befehle han- 
delt, die unter DOS ein 
Äquivalent haben. So er- 
gibt z. B. der Befehl 
„REN text.dat help.dat“ 
die Datei „elp.dat‘, erst 
durch Einfügen eines Tren- 
nungszeichens (z. B. Rück- 
strich) zwischen den Datei- 
nahmen wird der Befehl 
korrekt ausgeführt. 
Leider sind das sicher 
noch nicht alle Mängel des 
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Beim Arbeiten mit dem 
PC sind mir aber außerdem 
noch andere, z. T. erhebli- 
che Mängel aufgefallen. So 
ist das Betriebssystem DOS- 
Plus für ernsthafte Anwen- 
dungen unbrauchbar, da feh- 
lerhaft und somit nicht zu- 
verlässig. Wer sich das „de- 
vice.cmd“ einmal mit einem 
Debugger ansieht, wird sicher 
Tränen in die Augen be- 
kommen angesichts des nai- 
ven Versuches, englische 
Schlüsselwörter ins Deutsche 


SCHNEIDER aktiv 


HOTLINE 
Montags 
I5.00 - 19.00 Uhr 


Tel; 


BASIC2 Interpreters, aber 
eines wird klar, ernsthaftes 
Arbeiten ist damit fast aus- 
geschlossen. (Oder soll ich 
bei einer Programmentwick- 
lung vielleicht zunächst jeden 
Befehl auszuprobieren, der 
im sog. Handbuch steht? 

Übrigens, bei Ihren Proble- 
men mit den Kursortasten 
handelt es sich nicht um 
einen Fehler. Vermutlich ha- 
ben Sie die „Ctrl‘“-Taste betä- 
tigt und damit auf reine 
Maussteuerung umgeschaltet. 
Erneutes Betätigen der Taste 
stellt den alten Zustand wie- 
der her. (Nachzulesen im 
Handbuch unter „Alternati- 
ven zur Maussteuerung). 


(089) 18 80 57 


zu übersetzen. Da deutsche 
Wörter nun. einmal meist 
länger sind, stimmen die 
Zeiger nicht mehr, folglich: 
„Nichts geht mehr“. (Unter 
DOS-Plus heißt das z. B. 
bei der Eingabe von ‚„‚de- 
vice con“: „ungültiges physi- 
kalisches Gerät“. Hierbei 
kann man sich dann noch 
mit „device on“ behelfen, 
bei anderen Teilen des „de- 
vice cmd“ geht das leider 
nicht so einfach). Auch fehlt 
unter DOS Plus völlig ein 
kleines Monitorprogramm. 
Natürlich läuft „debug.exe“ 
von MS-DOS auch unter 
DOS Plus, wenn man ihm 
durch Ändern eines Bytes 
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die Betriebssystemabfrage 
bzw. die Auswertung dersel- 
ben abgewöhnt, aber wer 
weiß das schon? 

Fazit: Wer wie ich über 
mehrere Einplatinencomputer 
und Homecomputer zum 
Schneider PC aufsteigt, er- 
hält ein modernes, leistungs- 
fähiges Gerät und kann sich 
sicher über manche Schwä- 
chen der Software hinweg- 
helfen (sprich: -programmie- 
ren). Wer aber Professionali- 
tät erwartet, wird zumindest 
mit der beigelieferten Soft- 
ware eine herbe Enttäuschung 
erleben. In einigen Punkten, 
z. B. bei der Bildschirmaus- 
gabe unter BASIC2, liegt der 
Schneider PC meiner Meinung 
nach weit unter Homecom- 
puter-Niveau. 

Bleibt nur zu hoffen, daß 
eventuelle Updates den bis- 
herigen Käufern kostenlos 
zur Verfügung gestellt wer- 
den, schließlich hat man ja 
ein Komplettpaket bezahlt. 
Aber leider, die Erfah- 
rung, ... 

(Jürgen Heisig, Leverkusen) 


„Kfz-Kosten ” — Ärger 
mit Steuerzeichen 


Der Ausdruck dieses Program- 
mes funktioniert nicht auf 
dem NLY 401. Ich habe 
einiges ausprobiert, aber ohne 
Erfolg. Können Sie mir hel- 
fen? Ich sende Ihnen ein 
Druckmuster mit. 

(Max Ullrich, Villingen) 


Bei Ihrem Ausdruck haben 
wir festgestellt, daß Sie den 
Listing-Text „(CTRL -R)“ 
in ebendieser Form eingege- 
ben haben. Wir haben die 
beiden Tastenfunktionen je- 
doch in Klammern gesetzt, 
um damit anzudeuten, daß 
es sich hierbei um ein Steu- 
erzeichen handelt. Geben Sie 
also an den jeweiligen Stel- 
len das Symbol ein, das 
durch Drücken beider Tasten 
entsteht. 


Neues für Bastler & 
Lötkolben-Freaks 


Die Firma Westfalia Technica 
veröffentlichte dieser Tage 
ihren neuesten Katalog (2/78) 
unter dem Motto „Electronic 
und Technic“. Auf über 170 
Seiten ist das Angebot an 
Computerzubehör sowie 
Werkzeug und Material für 
den Elektronikbastler aufge- 
listet. Die Adresse finden 
Sie im Bezugsquellen-Ver- 
zeichnis. 


„Cricks” — ohne 
Fehl und Tadel 


Nachdem ich stundenlang das 
vorgenannte Listing in der 
von Ihnen, bzw. dem Autor, 
beschriebenen Reihenfolge 
eingetippt habe, war mein 
Erstaunen groß, als mein 
Computer (Schneider 6128) 
auf den Befehl -RUN- mit 
der Weigerung —Syntax Error 
in 100— antwortete. Eine 
erste Überprüfung ergab, daß 
kein Eingabefehler vorlag. 
Blieb mir nur die Schluß- 
folgerung, daß im Listing sel- 
ber eine Panne passiert sein 
mußte, evtl. ein Druckfehler. 

Wie dem auch sei, alle 
Mühe war vergebens, das 
Programm lief nicht und der 
Rechner antwortete stets mit 
der ihm eigenen Konsequenz: 
Syntax Error in 100. 

Wie heißt es doch in der 
Bibel? ,„.. in großer Not 
schrei ich zu Dir ...“. Was 
bleibt mir also anderes übrig, 
als diesen notfallmäßigen 
Schrei auszurufen und Sie 
um Ihre Mithilfe zu bitten. 

(Dietmar Racky, Göttingen) 


„Viele Datas sind des Tip- 
pers Tod‘, so möchten auch 
wir einmal zitieren (allerdings 
weniger klassisch, sondern 
F.W.). 

Bei Zeile 100 handelt es 
sich um die Leseroutinen der 
Datas, die anschließend in 
den Speicher „gepoked“ wer- 
den. Dies läßt darauf schlie- 
ßen, daß trotz sorgfältiger 
Überprüfung ein Tippfehler 
vorliegt. Da der Abbruch 
und die Fehlermeldung aller- 
dings immer in der gleichen 
Zeile erfolgt (es kann halt 
nicht „gepoked‘‘ werden) 
nutzt Ihnen dies Wissen zu- 
erst einmal gar nichts. Viele 
CPC-Besitzer vergessen jedoch 
die TRON-Routine des Be- 
triebssystemes. Hierbei wird 
angezeigt, welche Zeilen ge- 
rade bearbeitet werden. La- 
den Sie also zuerst das 
Programm (mit LOAD“..) ge- 
ben Sie TRON (und ENTER) 
ein und anschließend RUN. 
Wenn die Einleseroutine nun 
abbricht, bleibt es zwar bei 
der alten Fehlermeldung, Sie 
sehen jedoch die letztbenutz- 
te Zeilenzahl und können 
so den Fehler lokalisieren. 


Lob, Rat und Tadel 


Zum einen hätte ich einige 
Äußerungen zur Schneider 
aktiv zu machen, zum ande- 
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ren wäre es schön, wenn 
Sie mir einige Fragen beant- 
worten könnten. 

Ein Lob der Schneider 
aktiv 4/87. Besonders der 
Artikel über Gauntlet hat 
mir gefallen, die Seitenhiebe 
auf einen gewissen Verriß 
waren doch recht deutlich. 
Der Bericht über die Ce- 
Bit war auch nicht schlecht. 

In Punkto Listingsabdruck 
hätte ich einige Fragen. Wäre 
es nicht möglich, die Li- 
stings mit Checksummer ab- 
zudrucken, es wäre eine enor- 
me Erleichterung. Zum ande- 
ren sind doch oft viele 
Fehler in den Listings, was 
die Sache — sprich die Freude 


auf den Computer. Es wäre 
schön, wenn Sie dieses Rät- 
sel lüften könnten. 

Um noch mal auf fehler- 
hafte Listings zurückzukom- 
men, in der Schneider aktiv 
Spezial 2/87 waren zumin- 
dest im Telefon- und Ad- 
reßprogramm und im Latein- 
vokabeltrainer einige grobe 
Fehler, aber ich werde nicht 
die erste sein, die Ihnen 
das mitteilt. 

(Simone Rosental, Göttingen) 


Nach einem Dank für das 
Lob gleich eine Korrektur 
für die merkwürdigen Sonder- 
zeichen im „Space Trader“ 
der Ausgabe 10/87. Nicht 


SuHnEIDER aktiv 


LESERBRIEFE 


Postlach 1161 
8044 Unterschleissheim 


am Programm — nicht gerade 
einfach macht. 

In Bezug auf die Leser- 
anfrage in der 4/87 nach 
dem „Dach“ und den ü, 
ä, und ö. In der Schneider 


.10/86 war ein Listing mit 


Namen „Space-Trader‘ abge- 
druckt. In diesem Listing 
waren (Beispiel Zeile 340, 
Teil 2: 310) einige Sonder- 
zeichen. Wir haben einige 
Zeichen ausprobiert, kriegen 
diese Symbole aber nicht 


nur wir, auch unsere Vor- 
gängerredaktion hatte an- 
scheinend Schwierigkeiten 
mit der Druckerausgabe, da 
der Printer nicht auf den 
ASCII-Zeichensatz eingestellt 
war. Das verschnörkelte c 
stellt den Teilungsstrich dar, 
der von links oben nach 
rechts unten verläuft (,„/“). 
Er befindet sich in der 
untersten Tastaturreihe des 
CPC neben dem Fragezei- 
chen. Das a mit-dem Häk- 
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chen sollte ein Klammer- 
affe (,@‘) sein und das u, 
ebenfalls mit Haken, ist der 
senkrechte Strich (,I“), der 
mit SHIFT und dem Klam- 
meraffen erzeugt wird. 

Was den Checksummer be- 
trifft, sind wir etwas skep- 
tisch ob die Geschichte 
klappt. Erstens nehmen es 
diese Hilfsprogramme sehr ge- 
nau und melden auch dann 
mal einen Fehler, wenn der 
Interpreter die Zeile durch- 
gehen lassen würde, und zwei- 
tens müßten wir diesen 
Checksummer regelmäßig 
oder zumindest öfters ab- 
drucken, um auch den Nach- 
züglern unter den Lesern die 
Gelegenheit zum Abdruck 
zu bieten. Aber wir setzen 
uns natürlich nicht über die- 
sen, schon öfters geäußer- 
ten Wunsch hinweg. Sollte 
uns ein geeignetes Programm 
vorliegen, werden wir es ab- 
drucken und unsere Listin 
danach ausrichten. Vielleicht 
setzt uns dieses Experiment 
mit unserer Skepsis ins Un- 
recht. Da wir bezüglich sol- 
cher Listings auch schon 
einigen Autoren abgesagt ha- 
ben, bitten wir noch einmal 
um Einsendungen zum The- 
ma „Checksummer“. 

Was die beiden Programme 
Telefon- und Adreßverzeich- 
nis sowie Lateinvokabeltrai- 
ner betrifft, sind Sie aller- 
dings die Erste, die sich 
über Fehler beklagt, wobei 
ein Druckfehler wegen des 
Fotosatzes ausgeschlossen ist. 
Um Ihnen weiterzuhelfen, 
mäßten wir eine Fehlermel- 
dung, wenn möglich mit 
Zeilenangabe, haben. Viel- 
leicht nutzen Sie einmal un- 
seren Telefonservice, der ja 
extra für solche Fragen ein- 
gerichtet wurde. 


So bitte nicht! 


Bereits mehrfach habe ich 
mir vorgenommen, mich bei 
Ihnen zu beschweren. Jetzt 
habe ich den Kanal endgül- 
tig voll! Wie kommen Sie 
überhaupt dazu, für eine so 
popelige Zeitschrift so viel 
Geld zu verlangen? Nicht 
nur das Papier ist misera- 
bel, der Druck ist noch viel 
schlechter und die Listings 
sind unter aller ..., manche 
Zeilen kaum zu lesen. Kein 
Checksum, wie lange wollen 
Sie das eigentlich noch ir- 
gend jemand bieten? Sie 
sollten sich irgend etwas 
einfallen lassen und nicht 
nur attraktive Titelbilder. Ih- 
re bisherigen Leser müssen 


LL—————————————— 


Sie erst einmal zurückgewin- 
nen. 
(Volker Lorch, Meppen) 


Da sie der erste sind, der 
sich in dieser Form bei 
uns beschwert, haben wir 
einmal Ihren Brief abgedruckt 
um ein Beispiel zu zeigen, 
auf welche Art der Kritik 
wir ungern reagieren. Zur Sa- 
che: 

Sicherlich würde sich eine 
bessere Papierqualität ohne 
Preiserhöhung realisieren las- 
sen, wenn man diese durch 
kräftige Werbeeinnahmen fi- 
nanziert. Wir glauben richtig 
zu handeln, wenn wir jede 
Abhängigkeit vermeiden und 
Werbung nur sehr vorsichtig 
in Betracht ziehen. Zum feh- 
lenden Checksummer lesen 
Sie bitte die Antwort auf den 
Brief von Simone Rosental. 

Mit dem Ausdruck unserer 
Listings sind wir selbst nicht 
immer zufrieden und arbeiten 
auch daran. Zuerst stellten 
wir auf Fotosatz um, damit 
Satzfehler ausgeschlossen 
werden. Jeder, der einmal ein 
längeres Listing abgetippt hat, 
weiß, daß es für einen Druk- 
ker bzw. Setzer fast unmög- 
lich sein dürfte, innerhalb ei- 
ner Woche sämtliche Listings 
fehlerfrei zum Druck aufzu- 
bereiten. Unsere jetzige Sor- 
ge gilt natürlich dem Druck- 
ergebnis. Zur Zeit liegen in 
der Druckerei verschiedene 
Listings vor, mit denen ex- 
perimentiert werden soll, wel- 
che bestmögliche Qualität zu 
erreichen ist. Wenn wir in die- 
ser Beziehung also sagen, daß 
wir weder Kosten noch Mühe 
scheuen, so ist dies nicht 
übertrieben. Wir glauben des- 
halb, daß uns Ihre Form der 
Kritik nicht ganz trifft. 


Merkwürdige Zeichen in 
verschiedenen Listings 


Seit einigen Wochen besitze 
ich einen CPC 6128 und bin 
im großen und ganzen noch 
ein Anfänger. Ich wollte vom 
Sonderheft 2/87 die CPC-Uni- 
versaldatei von den Seiten 92 
bis 100 abtippen. Bevor ich 
mich an die Arbeit machte, 
stellte ich fest, daß ich zwei 
Zeichen nicht richtig verstand. 
Aus diesem Grunde bitte ich 
Sie, mir zu helfen. Ich hoffe, 
daß Sie mir baldigst antwor- 
ten können, damit ich die 
Universaldatei doch noch ab- 
tippen kann. 


(Gerhard Malik, Bischmisheim! 


Wir haben Ihre Anfrage stell- 
vertretend für eine Menge an- 
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derer Briefe mit gleichem In- 
halt abgedruckt. Die „merk- 
würdigen“ Zeichen entstan- 
den durch einen Drucker, der 
hardwaremäßig auf den deut- 
schen Zeichensatz eingestellt 
war. Damals hielten wir dies 
für sinnvoll, mittlerweile wur- 
de die Einstellung der Dip- 
Schalter jedoch von uns ge- 
ändert. Da wir immer ein 
wenig Vorlauf bei der Gestal- 
tung unseres Heftes haben, 
kann es immer noch passie- 
ren, daß wir ein derartiges 

Listing noch ausdrucken. Des- 

halb noch einmal eine zusam- 

menfassende Erklärung. 

*“ (Dach, bwz. Pfeil nach 
oben): Hochpfeil (CPC-Ta- 
ste mit dem englischen 
Pfundzeichen) 

Ö (großes OÖ): \ (Divisions- 
strich von links oben nach 
rechts unten) 

ö (kleines ö): I (Gerader 
Strich, erzeugt durch 
SHIFT und 

ü (kleines ü): ] (eckige Klam- 


mer zu 
:ä (kleines ä): | (eckige Klam- 


(„Klammeraf- 


„test“ hat wieder zugeschla- 
gen 


Nicht wenig Zuschriften be- 
kamen wir zu unserem Kom- 
mentar über die Testmetho- 
den der Zeitschrift ‚test‘. 
Viele, die uns schrieben, sa- 
hen die Sache etwas gelasse- 
ner und werteten den Test- 
bericht als einen nicht ernst- 
zunehmenden Flop des Ver- 
brauchermagazins. 


Stiftung Warentest ist es bish- 
her immer wieder gelungen, 
einen informativen Überblick 
zu geben, daran ändert auch 
Ihr Kommentar nichts. Gera- 
de bei einem Computer geht 
es doch um viel Geld. Was 
nutzt es mir, wenn ich genau 
erfahre, wie IBM sein Betriebs- 
system nennt, ansonsten aber 
keinerlei Vergleichsmöglich- 
keiten erhalte. Der Bericht in 
der Zeitschrift ‚„test‘‘ führte 
bei mir zum Kauf eines Rech- 
ners, mit dem ich bisher sehr 
zufrieden bin. Daß er preis- 
werter war als im Heft be- 
schrieben, konnte mich nur 
freuen und ob es sich um eine 
deutsche Ausführung handelt, 
interessiert mich überhaupt 


nicht. 
(O. Lutz) 


Ich kann Ihrem Kommentar 
nur zustimmen, vermute aller- 
dings, daß Sie sich lediglich 
über unfachliche Konkurrenz 
im schreibenden Gewerbe 


aufregen. Wer wirklich einen 
Computer in der getesteten 
Preislage kauft, der wird sein 
Wissen wohl eher aus einer 
Fachzeitschrift beziehen. Es 
ist in meinem Bekanntenkreis 
jedenfalls kein User, der sich 
diese Zeitschrift kauft, weil 
ihm Anschaffungen für den 
Computer bevorstehen. 
(Helmut Mieth) 


Ist der Kunde nur die 
Melkkuh? 

Stoppt endlich die 
Computermafia 


Es schien, als haben wir in 
ein Wespennest gestochen. Es 
gab wohl kaum einen Leser, 
der nicht irgendwelche 
schlechten Erfahrungen mit 
einem Händler oder einer 
Softwarefirma machen mußte. 
Einige konkrete Beispiele 
mußte wir allerdings weglas- 
sen, da die Absender ver- 
gaßen, Unterlagen beizufü- 
gen. Auch können wir leider 
keine Rechtshilfe im Einzel- 
fall bieten oder nur mal auf- 
grund eines Vorfalles vor der 
Firma warnen (wie es oft ge- 
fordert wurde). Wir bitten 
dazu um Verständnis. 


Zu Ihrem Artikel „Stoppt die 
Computermafia“‘ kann ich Ih- 
nen nur gratulieren. Ich be- 
zweifle allerdings, daß sich 
auch nur irgendetwas ändern 
wird. Mein neuer Schneider 
funktionierte erst nach zwei- 
maliger Reparatur und es dau- 
erte 4 Wochen (in denen der 
Händler bereits sein Geld hat- 
te!!!), bis ich das erste Pro- 
gramm endlich ablaufen las- 
sen konnte. Hätte ich mir 
einen Neuwagen gekauft, so 
wäre man mir wohl mit einem 
Leihwagen entgegen gekom- 
men und wäre mir auch sonst 
zuvorkommender begegnet. 
Bei einem Computer gilt dies 
wohl nicht. Ich kann nur 
jedem empfehlen, das Gerät 
noch im Laden auszupacken 
und anzuschließen. Ein defek- 
tes Gerät soll man dann gar 
nicht mitnehmen. Hat man es 
erst einmal bezahlt und den 
Laden verlassen, dann ist man 
im Schadensfall nur noch der 


Dumme. 
(F. Zarfeld) 


Ich frage mich wirklich, wer 
denn bei einem Softwarever- 
lag nachfragt, um eine Foto- 
kopie des Handbuches zu ma- 
chen. Sind wir denn alle nur 
noch Bürokraten und Amts- 
schimmel?! Es wird jedenfalls 
einmal Zeit, daß man sich 
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darüber im Klaren ist, wel- 
cher Mist so im Urheber- 
recht steht. 

(Stefan Brügge) 


Insgesamt kann man dem Ar- 
tikel „Ist der Kunde nur die 
Melkkuh‘‘ zustimmen. Einige 
Fälle, die Sie schildern, schei- 
nen mir aber doch an den 
Haaren herbeigezogen. Bei 
der unklaren Rechtslage, die 
in der EDV-Branche nun ein- 
mal herrscht, sieht sich wohl 
jeder Verlag oder Händler zu 
ausführlichen Rechtsausle- 
gungen gezwungen. Dies gibt 
ihm von Fall zu Fall die Mög- 
lichkeit zur Klage. Es dürfte 
jedoch keine Softwarefirma 
geben, die gegen die Kopie 
eines Handbuches klagt, nur 
weil der Käufer sein Original 
schonen wollte. Außerdem ist 
es wohl auch nicht üblich, 
daß jemand einen Roman 
fotokopiert, um das Buch zu 


schonen. 
(Klaus Grohmann) 


Ihrem Artikel fehlte eigent- 
lich die Geschäftemacherei 
sogenannter „Abmahnverei- 
ne“ und die Unterstützung, 
die diese durch die Polizei 
und Staatsanwaltschaft erhal- 
ten. Heutzutage steht man be- 
reits mit einem Bein im Ge- 
fängnis, wenn man sich einen 
Computer anschafft. 

(J. Kirchner) 


Was Sie unter Fall 2 ganz hy- 
pothetisch schilderten, ist mir 
tatsächlich passiert. Ich ver- 
zichtete auf eine Sicherheits- 
kopie, was laut Handbuch so- 
wieso unmöglich war. Nach 
einem Bedienungsfehler trug 
die Diskette einen Schaden 
davon und ich versuchte, das 
Programm einzutauschen. 
Nachdem sich lange Zeit nie- 
mand meldete und meine 
Sendung auch nicht zurück- 
kam, fand ich heraus, daß es 
den Verlag schon nicht mehr 
gab. Die Texte, die ich mir 
bis dahin erstellt hatte, konn- 
ten mit einem anderen Pro- 
gramm zwar gelesen werden, 
mußten jedoch umgearbeitet 
werden. Bei mittlerweile 80 
Druckseiten eine erhebliche 
Arbeitsbelastung. Ich werde 
auch nach dieser schlechten 
Erfahrung keine illegale 
Raubkopie benutzen. Aber in 
Zukunft kaufe ich nur noch 
Programme, die mir die Mög- 
lichkeit einer Sicherheitsko- 
pie bieten. Der Umtauschga- 
rantie einer Firma werde ich 
auf keinen Fall mehr trauen. 


(Bernhard Mittler) 


Kyr2g 
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GEWUSST WIE: 


SO ARBEITET 


DISKETTEN- 
STATION 


Tracke, Beaud, Data-Format und CP/M Spur: immer 
wieder tauchen bei einem Testbericht Stichwörter 
auf, die erst einmal verstanden werden müssen, wenn 
man die Kriterien, die bei einem Gerät ermittelt 
wurden, überhaupt einordnen will. Allerdings wird das 
Wissen um die technische Funktion der Computer- 
Hardware niemanden in die Wiege gelegt und es 
lohnt sich immer, sich weiterführende Literatur 
zu kaufen, nur um einmal grundsätzliches über die 
Technik zu erfahren. In Schneider aktiv wird es nun 
von Zeit zu Zeit einen Artikel über die verschieden- 
sten Peripheriegeräte geben, der Ihnen das Basiswissen 
vermitteln soll. Dabei geht es nicht um einzelne 
Leistungsdaten, sondern um die allererste Frage, die 
sich wohl jeden schon einmal gestellt hat: 

„Wie funktioniert denn ...?” 


Es hört sich natürlich 
simpel an, aber alle Er- 
klärungen über ein Dis- 
kettenlaufwerk beginnen 
mit dem Datenträger, der 
Diskette. Mittlerweile 
gibt es drei verschiedene 
gebräuchliche Größen. 
Da wäre zuerst einmal die 
für den Schneider wichti- 
ge 3 Zoll Größe. Bereits 
davor gab es die 5.25 
Zoll Diskette und in 
letzter Zeit kam auch ver- 
stärkt — ausgehend von 
den .Atari ST und Com- 
modore Amiga Compu- 
tern — die 3.5 Zoll- 
Scheibe auf dem Markt. 
Eine 8 Zoll-Version fin- 
det sich bei bestimmten 
professionellen Anlagen 
immer noch, ist aber auf 


dem Rückzug. 
Die Größe der Diskette 
sagt allerdings noch 


nichts über den Speicher- 
platz aus, den sie im Ge- 


brauch bietet. Ebenso 
zweitrangig ist die Ver- 
packung der Magnetschei- 
be. Während die 5.25“ 
Diskette in einer Pappe 
steckt, auf deren Innen- 
seite ein Flies aufge- 
bracht ist, werden die 
eiden kleineren in einem 
Plastikgehäuse ausgelie- 
fert. Vor und Nachteile 
der jeweiligen Konstruk- 
tion sind klar. Herstel- 
lungskosten und damit 
Verkaufspreis stehen 


Plastikhülle dient dem 


Schutz 


einer stabileren Kon- 
struktion und damit einer 
größeren Datensicherheit 
gegenüber. 

Innen findet sich je- 
doch immer das gleiche: 
Eine dünne Folie, die mit 
einem magnetisierbaren 
Material beschichtet wur- 


Ze FI - / F 


Skizze: Spur- und Sektorauf- 
teilung nach der Formatierung 


de. Unterschiede werden 
erst durch die Eisenver- 
bindung und durch Sorg- 
falt und Prüfung bei der 
Herstellung erkennbar. 
Die Fabrikation von ein- 
und zweiseitigen Disket- 
ten ist nämlich die glei- 
che. Erst der vermehrte 
Aufwand beim Austesten 
eines zweiseitigen Daten- 
trägers verursacht die 
Mehrkosten. 

Was im wesentlichen 
an dieser Konstruktion 
noch fehlt, ist das mittlere 
Loch (5.25“) eventuell 
mit einer „Felge“ (wie 
etwa bei den 3“- und 
3.5”-Disketten), in dem 
die Achse des Laufwerk- 


Motors greifen kann. Au-. 


ßerdem wird ein Index- 
loch nahe der Mitte be- 
nötigt (wozu sehen wir 
später), und die Hülle 
der Magnetscheibe muß 
natürlich eine Aussparung 
für den Leseknopf bieten. 
Wenn diese — wie bei den 
beiden „kleinen“ Disket- 
ten (3.5“ und 3°) bei 
Nichtbetrieb verschlos- 
sen ist, dient dies zusätz- 
lich der Sicherheit, denn 
der eigentliche Datenträ- 
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ger darf keinen Staub 


abbekommen (deshalb 
auch das innenliegende 
Reinigungsflies) und erst 
recht nicht mit den Fin- 
gern berührt werden (und 
mögen sie auch noch so 
sauber sein). Weiteres 
nützliches Beiwerk ist 
eine Schutzvorrichtung 
gegen versehentliches Be- 
schreiben. Bei einer 
„Papp-Floppy“, der 
5.25“-Diskette, löst man 
das Problem mit einer 
Kerbe in der Hülle, die 
überklebt werden kann. 
Die plastikumhüllten 
Micro-Floppys haben 
hierzu einen eleganteren 
Schieber. 


Spuren und Sektoren 
Leitlinien und Zielkoor- 
dinaten 


Wenn Sie sich einmal den 
Tonkopf eines Kassetten- 
rekorders anschauen, 
dann werden Sie jenes 
blanke Viereck bemerken, 
welches letztlich die 
Fläche darstellt, auf der 
die Daten gelesen werden. 
Dabei läuft das Band vor 
diesem fest installierten 
Lesekopf vorbei und 
führt in eben dieser Höhe 


—————————————————————————————————————————————— 


man an en ernnc 


aI2e Fire 


stets neue Signale mit 
sich. Spurlage und Lauf- 
richtung stehen also von 
vorneherein fest, es gibt 
keine Orientierungs- 
schwierigkeiten. 

Nicht so bei einem Dis- 
kettenlaufwerk, dessen 
Lesekopf beweglich ange- 
bracht ist und der sich 
auf der ganzen Scheibe 
zurecht finden soll. Da- 


Beweglicher Lesekopf 


mit er das „Bandstück“ 
findet, benötigt er „Leit- 
linien, mit ‚denen die 
ganze Diskettenfläche 
eingeteilt ist. Entlang die- 
ser „Leitlinien“ kann er 
sich dann sein Ziel su- 
chen, den Ort, auf dem 
die Daten abgespeichert 
sind. Den Vorgang, eine 
Diskette mit dieser Orien- 
tierungshilfe zu versehen, 
nennt man Formatieren 
und die Aufgabe über- 
nehmen Programme. Die 
wichtigsten Stichwörter 
die einem bei der Unter- 
teilung einer Diskette be- 
egnen, lauten: Spur, 
Sr Record und 
Block (Skizze 1). Sekto- 
ren sind jene Flächen, die 
entstehen, wenn gerade 
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Linien durch den Mittel- 
punkt gezogen werden. 
Als anschauliches Beispiel 
dürfen hier die schon oft 
zitierten Tortenstücke 
nicht fehlen. Beim 
Schneider-Laufwerk wird 
jede Diskette in 9 dieser 
„Tortenstücke“ unter- 
teilt. 

Die Spuren — profes- 
sionell auch Tracks ge- 
nannt — werden von 
außen und innen in Rin- 
gen aufgetragen. Der 
äußere Rand der Diskette 
bildet also einen immer 
kleiner werdenden Kreis, 
nicht etwa eine Spirale 
wie die Rille einer Schall- 
platte. Von den so ent- 
standenen ‚‚Fahrspuren“ 
gibt es — ebenfalls wie- 
der auf die DDI von 
Schneider bezogen — 40 
Stück an der Zahl, wobei 
die Null mitzählt und die 
Rede also von 0 bis 39 
ist. Eine einzelne Spur 
entspricht im übertrage- 
nen Sinne dem Band 
einer Kassette, wurde 
eben nur in einer Kreis- 
bahn angelegt. Der Teil 
dieser Spur, der innerhalb 
eines Sektors liegt, faßt 
den Platz für genau 512 
Byte zur Datenaufzeich- 
nungen. Verzwickt wird 
eserst, wenn man anfängt, 
die Begriffe zu vermi- 
schen. Haben wir eben 
noch das „Tortenstück“ 
als Sektor bezeichnet, so 
ist in der Regel nur der 
Spurtteil damit gemeint 
der in diesem Kreisaus- 
schnitt liegt. Ein Sektor 
hat also 512 Bytes, nicht 
etwa 512 mal 40. 


Speicherplatz kann man 
berechnen 


Somit läßt sich auch 
leicht nachrechnen, wie- 
viel Speicherkapazität 
eine Diskette bietet. Es 
snd dies 512 Byte je 
Sektor (Spurteil im Kreis- 
ausschnitt) multipliziert 
mal 9 ergibt 4608 Bytes. 
Noch einmal multipliziert 


mit 40 (Spuren) kommt 
man dann auf 184320 
Bytes oder korrekter 180 
KByte (184320 geteilt 
durch 1024). 

Damit sich überhaupt 
noch einer auskennt (bes- 
ser zwei: Controller und 
Schreib-/Lesekopf), wer- 
den die Sektoren noch 
markiert. Später ergibt 
sich dann aus der Angabe 
von Spur und Sektor eine 
genaue Lokalisation der 
gewünschten 512 Bytes. 


Andere machen es anders 
Von Records unter CP/M 


Vielleicht haben Sie aber 
auch schon einmal etwas 
von Records gehört oder 
von den 128 Bytes, die 
darin Platz finden. Aber 
auch das läßt sich leicht 
erklären. CP/M war als 
Betriebssystem nun ein- 
mal vor dem AMSDOS 
(Amstrad Disc Operating 
System) da und legte da- 
mals eine eigene Eintei- 
lung der Diskette vor. 
Hierbei wird ein Sektor 
noch einmal in 4 Records 
unterteilt, die jedesmal 
nur 128 Byte fassen, 
macht zusammen eben- 
falls wieder 512 Byte aus. 
Was aber Digital Research 
(der Entwickler von 
CP/M) kann, kann 
chneider oder Amstrad 
schon lange und packte 
der _Begriffsverwirrung 
noch eins drauf. Aus zwei 
Sektoren machte AMS- 
DOS einen Block mit 
1024 Byte. Unter Basic 
ist der Block auch die 
kleinste Einheit, auf die 
zugegriffen werden kann. 
„Aha“, können Sie jetzt 
zu recht sagen, „deshalb 
nimmt auch der kleinste 
Einzeiler auf der Diskette 
genau ein KByte ein!“. 
Stimmt, genau dies ist 
der Grund; und als näch- 
stes erklärt es sich, 
warum unter Schneider- 
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Basic keine Datei mit 
wahlfreien Zugriff auf 
einen Datensatz möglich 
ist. i 


Das Laufwerk: Präzise 


Mechanik und schnelle. 


Elektronik 


Damit ist die Diskette zur 
Benutzung vorbereitet 
und wir kommen zum 
eigentlichen Gegenstand 
dieses Berichtes, dem 
Laufwerk. Über das 
Grundprinzip wollen wir 
anschließend reden, 
zuerst einmal ein paar 
wesentliche, bauartbe- 
dingte Unterschiede. Auf- 
fallend ist wohl das Ange- 
bot von einseitigen und 
zweiseitigen Laufwerken. 
Da bei letzterem der 
Datenträger auch von der 
Unterseite aus gelesen 
werden kann, ist ein zwei- 
ter Lesekopf vonnöten. 
Die Schneider Floppy ist 
mit der gleichen Idee 
einen anderen Weg gegan- 
gen, der letztlich billiger 
war. Zwar kann auch hier 
die Diskette auf beiden 
Seiten beschrieben wer- 
den, jedoch gibt es nur 
einen oben liegenden 
Lesekopf. Damit kann 
die teure Scheibe (als 
hätte man es damals 
schon geahnt) optimal ge- 
nutzt werden und der 
Preis für die Hardware 
beibt niedrig. 

Stichwörter für ein 
Laufwerk sind Netzteil 
und Motor, Schreib-/ 
Lesekopf und Controller. 
Das Netzteil muß nicht 
extra erklärt werden. Es 
sorgt dafür, daß die not- 
wendige Spannung für 
den Motor vorhanden ist. 
Gegen Störstrahlungen — 
auch hierauf reagieren 
Disketten empfindlich — 
ist meist ein Abschirm- 
blech eingebaut. Außer- 
dem ist seitens der Kon- 
strukteure gegen eine 
Überhitzung vorzubeugen 


indem man Kühlrippen 
anlegt oder für ausrei- 
chend groß dimensionier- 
te Belüftungsschlitze 
sorgt. Beachtet man dies, 
dann ist zur Stromver- 
sorgung des Laufwerkes 
nichts weiter zu sagen; 
Netzteile werden schließ- 
lich nicht erst seit Erfin- 
dung des Computers 
gebaut. 

Auch zu dem Motor 
der die Diskette in Um- 
drehung bringt, ist nicht 
viel zu sagen. Laufruhig 
muß er natürlich sein und 
schnell. Die Diskette in 
der Schneider DDI-1 will 
auf etwa 300 Umdre- 
hungen in der Minute 
gebracht werden. Wann 
diese Geschwindigkeit er- 
reicht ist und wann eine 
Umdrehung vollendet ist, 
das teilt das Indexloch 
der Laufwerkselektronik 
mit. Das simple Loch 
läßt nämlich einen Licht- 
strahl durch, welcher regi- 
striertt wird. Bei dem 
Tempo ist natürlich nur 
ein Flackern zu festzu- 


stellen, aber aus dieser- 


Frequenz ist es für die 
Schaltungen ein leichtes 
die Geschwindigkeit zu 
steuern. Wie die Rotation 
auf die Magnetscheibe 
übertragen wird, daran 
scheiden sich die Geister. 
Bei der 5.25“ Floppy 
schiebt sich eine konisch 
zulaufende Achse von 


Grober Keil bei 
5.25 Zoll Disketten 


unten in das zentrierte 
Antriebsloch. Diese rela- 
tiv brutale Methode führ- 
te dazu, daß bald jeder 
Diskettenhersteller seine 
5.25 Zoll-Disketten mit 
sogenannten Verstär- 
kungsringen auslieferte. 
Etwas feinsinniger ist da- 
gegen die Kraftübertra- 
gung bei der Micro- 
Floppy, bei der die 
Magnetfolie in der Mitte 
eine richtige Felge ent- 
hält. 

Mehr zu sagen gibt es 


über den Schreib-/Lese- 
kopf, auf Bild 1 recht 
gut zu erkennen. Für ihn 
steht ein eigener Motor 
zur Verfügung, der ihn 
schrittweise bewegt. Er 
ist nämlich an zwei Lauf- 
schienen über dem Daten- 
träger angeordnet und 
seine Bewegungsfreiheit 
reicht von der Mitte der 
Diskette bis zum Rand, 
entsprichtt somit dem 
Radius der Scheibe und 
der dort angebrachten 
Schreiböffnung. Wenn 
sich also die ‚Diskette mit 
der vorgeschriebenen 
Geschwindigkeit dreht 
und dabei der Lesekopf 
vom Zentrum bis zum 
Rand hin und her ge- 
schoben werden kann, so 
wird jeder physikalische 
Ort auf der Scheibe er- 
reicht. Es ist allerdings 
noch nicht geklärt, wie 
der Tonkopf weiß, was er 
wo lesen oder schreiben 
soll. 


Diskettengröße ist nicht 
entscheidend 


Für so eine „Kopfar- 
beit“ ist der Controller 
zuständig. Der Controller 
ist jene schwarze Schach- 
tel, die an der Rückseite 
des CPC eingesteckt wird, 
aber das Plastikgehäuse 
ist natürlich nicht nur 
dazu da, die Steckverbin- 
dung zu schützen. Im 
Inneren steckt eine kleine 
Platine mit 12 ICs (Inte- 
griertten Chips) und 
einem 32 KByte großen 
ROM. Während die ICs 
eine recht intelligente 
Schaltung ergeben, ent- 
hält das ROM das AMS- 
DOS Betriebssystem und 
mogelt dadurch ein 
wenig, denn es wird nur 
zur Hälfte genutzt 
(Adressen &C000 bis 
&FFFF ergeben 16383 
Byte). Aber um derlei 
Verschwendungssucht 
soll es in diesem Bericht 
nicht gehen, sondern um 
die Theorie der Daten- 
aufzeichnung. 


Schneider 3 Zoll Laufwerk: 

Die Elektronik eines 
Controllers schaut also 
nach, wo das Programm 
oder die Daten auf der 
Diskette liegen. Dabei 
sind alle Programme oder 
Datensätze, die über den 
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oben: : 

Innenleben eines Laufwerkes, 
In der Mitte der beweglich an- 
gebrachte Lesekopf. 


Die 3 Zoll Diskette: 


kleinsten Bereich eines 
Blockes von 1024 Byte 
hinausgehen in mehrere 
Blöcke unterteilt, die an 
den unterschiedlichsten 
Orten auf der Diskette 
verteilt sein können. Für 
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die genauen Einzelheiten 
benötigt der Controller 
dazu eine Datei, in der 
die Koordinaten stehen, 
das sogenannte Directory 
oder Verzeichnis. Dieses 
Verzeichnis enthält 


neben Dateinamen, 
Backup-Parameter und 
einiges mehr auch noch 
die Koordinaten des Spei- 
cherplatzes und zwar auf- 
geschlüsselt in Spur und 
Block. Das Verzeichnis 
selbst ist leicht zu finden. 
Es liegt unter AMSDOS 
auf der äußersten Spur 
(Spur 0, da man von O bis 
39 zählt) und bei CP/M 
blieb nur auf der dritten 
Spur Platz (Spur 2), da 
die ersten beiden vom 
Betriebssystem belegt 
sind. Und wenn dem 
Controller die Koordina- 
ten schließlich bekannt 
sind, wird der Kopf auf 
die richtige Spur vorge- 
rückt und es wird ihm 
mitgeteilt, welcher Block 
(bei CP/M Record) zu 
lesen ist. Der Block ist ja 
markiert und der Lese- 
kopf kann erkennen 
wann er gerade unter ihm 
„vorbeisaust“. 


Der Controller als 
Verwalter 


Dem Controller unter- 
liegt natürlich ganz allge- 
mein die Verwaltung des 
Directorys, als sei er ein 
Beamter. Er muß eintra- 
gen, wenn ein Programm 
gelöscht wird (es wird 
tatsächlich nicht richtig 
gelöscht sondern nur zum 
Überschreiben freigege- 
ben), und er muß aus 
erstmalig überschriebenen 
Programmen die Backup- 
Sicherheitskopie machen. 
Außerdem ist es mit den 
Zielkoordinaten nicht 
getan, es fehlen ja noch 
die Angaben, ob das Pro- 
gramm nur in einem 
Block gelagert ist (selten, 
da nur 1 KByte groß) 
oder ob noch mehr vor- 
handen ist und wo dieser 
Rest sich befindet. Wer 
nun glaubt, all diese Ar- 
beiten müßten einen 
schlechten Einfluß auf 
die Schreib- und Lesege- 
schwindigkeit haben, 
dem sei der Vergleich 
zwischen Rekorder und 
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Diskette genannt. Der 
CPC Rekorder schafft 
2000 Baud (Bits pro 
Sekunde) und das ist für 
dieses Speichermedium 
schon schnell. Die DDI-1 
liegt im Tempo beim 
Standard der Disketten- 
laufwerke und das sind 
immerhin 250 KBit je 
Sekunde. 

Wenn es Sie weiter 
interessiert, welches 
Byte in diesem Directory 
welche Bedeutung hat, 
dann schauen Sie doch 
mal in unseren Assemb- 
lerkurs hinein. Wie Sie 
mittlerweile wissen dürf- 
ten, ist mit Basic alleine 
nicht mehr viel aus dieser 
„Datei“ herauszuholen. 
Aber das Verständnis für 
die Funktionsweise eines 
Diskettenlaufwerkes, das 
Sie nunmehr haben, dürf- 
te Ihnen helfen, die Vor- 
teile (eigene Verwaltung 
und schnelle Lese- und 
Schreibgeschwindigkeit) 
und die Nachteile (kein 
wahlfreier Zugriff unter 
Basic) einer Disketten- 
station zu beurteilen. 


Zum Abschluß noch ein 


paar Stichworte: 

Zoll (“): 

Größenangabe für Dis- 
ketten. Geläufig sind 


5.25“, 3.5“ und 3“-Dis- 
ketten 

Spur (Track): 

40 (0 - 39) kreisförmige 
durch Software aufgetra- 
gene Einteilungen auf der 
Diskette 

Sektor: 

Genau jener Spurab- 
schnitt (faßt 512 Byte) 
der innerhalb eines Kreis- 
ausschnittes liegt. Hin 
und wieder wird aber 
auch das gesamte „Tor- 
tenstück“ mit Sektor be- 


zeichnet. 

Record: 

Die 128 Byte eines Vier- 
telsektors unter CP/M 
Block: 

Zwei Sektoren (1024 


Byte) unter AMSDOS 


DIE KUNST, 


KUNDEN ZU 


VERÄRGERN 


„Was dem einen seine 
Uhl, ist dem anderen 
seine Nachtigall“, so lau- 
tet ein altes deutsches 
Sprichwort. Dies trifft 
auch auf die immer billi- 
ger werdenden Home- 
und Personalcomputer 
zu, deren Preisverfall in 
der Regel sicherlich die 
Nachtigall vieler User sein 
dürfte. Es vergeht kaum 
ein Tag, an dem nicht 


Der High-Tech Gemüse- 
markt oder die Kunst, 
mit Preissenkungen den 
Kunden zu verärgern 


wieder ein Rechnertyp 
preiswerter wurde, und 
wer sich nach einem 
bestimmten Modell um- 
schaut, der muß sich 
vorkommen, als bummele 
er über einen Gemüse- 
markt der High-Techno- 
logie. Aber immer größer 
wird die Zahl derjenigen, 
die sich über jedes Pro- 
zent ärgern müssen. Eini- 
ge Fallbeispiele sollen 
hier einmal genannt wer- 
den um zu zeigen, um 
welche Summen es doch 
geht. 


Preissenkungen: Nicht 
jeder freut sich um jedes 
Prozent 


Als sich Herr Meier vor 
wenigen Wochen: einen 
Schneider CPC 6128 
kaufte, bezahlte er fast 
DM 1000,— für das Ge- 
rät, war aber ganz zufrie- 
den damit. Vor einigen 
Tagen jedoch wollte er 


seinen Diskettenvorrat 
auffrischen und stellte in 
seinem Laden fest, daß 
sein Prachtstück um DM 
200,— im Preis gesunken 
war. Der rapide Preisver- 
fall um 20 % verärgerte 
den ansonsten zufriede- 
nen Schneider-Kunden. 

Nicht besser ging es 
Herrn Müller. Er besorgte 
sich gleich im neuen Jahr 
einen PC 1512 der glei- 
chen Firma. Grundkonfi- 
guration versteht sich, 
denn mit dem Einbau 
einer Vortex-Drivecard 
sparte er — laut Werbung 
— satte DM 600,— gegen- 
über dem entsprechend 
ausgestatteten Schneider 
PC’. Trotzdem mußte er 
immer noch die stolze 
Summe von DM 3397,— 
bezahlen. Monochromer 
Monitor, denn bei diesen 
Preisen steht der Wunsch 
nach Luxus zurück. 

Wen wundert es, wenn 
Herrn Müller der Früh- 
stücksappetit vergeht, 
weil er bei der Lektüre 
der Tageszeitung auf ein 
Inserat stößt, welches nur 
wenige Wochen nach sei- 
nem Computerkauf in 
Druck ging. Darin wurde 
genau seine Konfigura- 
tion für lächerliche (im 
Verhältnis) DM 2.999,— 
gepriesen. Der Händler 
war keineswegs ein billi- 
ger Jakob und der Preis 
war kein einmaliges Son- 
derangebot. Die allerein- 
fachste Ausstattung 
seines PC gab es nunmehr 
sogar für DM 1499,—, das 
waren 25 % weniger. 
Auch Herr Müller gehört 
seitdem zu jenen Schnei- 
der Usern, die zwar mit 


den technischen Leistun- 
gen ihrer Geräte zufrie- 
den sind, sich aber ein 
wenig geprellt fühlen, 
weil sie nicht die Geduld 
aufbrachten, ein paar 
Wochen zu warten, 

Die Liste der — an sich 
erfundenen, aber sicher 
realen — Fälle ließe sich 
noch endlos fortsetzen, 
beispielsweise mit jenen 
Amiga-Kunden, die ein- 
mal über 5000,— DM für 


ein Gerät bezahlten, wel- 
ches eine schlechtere 
Ausstattung besaß als 
jene, die man heute für 
runde 1900,— DM be- 
kommen kann. Aber blei- 
ben wir lieber bei Schnei- 
der, wie es sich für 
Schneider aktiv gehört. 

Mit Spannung wurde 
der neue PC erwartet. 
Viele stellten die An- 
schaffung ihres neuen 
Computers zurück, um 
erst einmal zu sehen, 
was denn da auf den 
Markt kommt. Es wurde 
ein MS-DOS Rechner und 
er fand reißenden Absatz. 
Warum? 

Nun, er war zuerst 
einmal billiger als die 
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Konkurrenz und hinter 
dem Gerät stand ein be- 
kannter Name mit großen 
Vertriebsnetz, von dem 
man sich auch Service 
und Beratung erhoffen 
konnte. Innerhalb weni- 
ger Monate gingen 40000 
dieser Geräte über den 
Ladentisch, und die Türk- 
heimer Firma kam sogar 
in Lieferschwierigkeiten 
(was damals allerdings 


nicht laut verbreitet wur- 


de). Aber die Konkurrenz 
schlief nicht. Viele, die 
vorher nur IBM im Auge 
hatten, schossen sich nun 
auch auf das Ziel Schnei- 
der ein und senkten noch 
einmal die Preise. Auf der 
anderen Seite sahen die 
Verbraucher, daß auch 
die Entwickler bei Amst- 


Preissenkungen müssen 
sein 


rad (dem Mutterhaus des 
PC) nur mit Wasser koch- 
ten, weil der Rechner ja 
kompatibel bleiben muß- 
te. Warum sollte man sich 
also nicht doch einen 
Exoten ins Haus holen, 
wenn es im Grunde ge- 


a 


"nommen immer nur um 
die gleiche Technik ging? 
Die Software lief ja und 
bereitete keinerlei Proble- 
me. 

Schneider wiederum 
war am Zug. Mit einigen 
Neuerungen (Herkules- 
Karte mit Umbausatz) 


war der PC plötzlich gar 
nicht mehr so billig. Es 
hatte sich auch herumge- 
sprochen, daß die Grund- 
konfiguration nicht recht 


zum Arbeiten taugte und 
unbedingt ein zwei- 
tes Laufwerk notwendig 
ist, um den Rechner eini- 
germaßen bequem bedie- 
nen zu können. Da in der 
Kalkulation noch Luft 
war, mußten die Preise 
gesenkt werden. Das Er- 
gebnis war ein 25 %iger 
Nachlaß und es darf ver- 
mutet werden, daß der 
Verkaufsboom weiter- 
geht. 


Schon bei Joyce gelernt: 


Wie man dem Kunden 
vor den Kopf stößt 


Bereits im Jahre 1986 


gab es eine spektakuläre 


_ MEINUNG 


Preissenkung bei Joyce. 
Mit der Einführung des 
zweiten Laufwerks ver- 
ringerte sich plötzlich der 
Preis um rund 600,— DM 
und zwar nicht etwa 
durch den technischen 
Unterschied, sondern bei 
Kauf des normalen, alt- 
hergebrachten Joyce- 
Rechners. Was damals 
vielen Käufern allzu bit- 
ter aufstieß, waren zwei 
Tatsachen. Zum Einen 


Radikale Preissenkungen wir- 
ken immer. Aber niemand ist 
sicher, daß der Computer 
nächste Woche nicht noch 
preiswerter ist. 


war der PCW in Groß- 
britannien schon immer 
billiger. Eine Preissen- 
kung war jenseits des 
Kanals nie nötig. Der 
deutsche Verbraucher be- 
wertete die Mehrkosten 
als Zoll- und Steuerko- 
sten. Aber auf einmal 
fielen diese anscheinend 
weg. Der zweite ärgerli- 


che Punkt war die Form 
dieses „Geschenks‘. Die 
Preissenkung wurde in 
einer Nacht- und Nebel- 
aktion durchgeführt und 
gar mancher kaufte sich 
seinen PCW am Samstag, 
um bereits nach dem 
Wochenende _festzustel- 
len, daß er DM 600,- 
glatt verschenkt hatte. 

Niemand kann damit 
rechnen, daß er nach 
solch ‚Wochenend-Miß- 
geschicken‘‘ wenigstens 
einen Teil der Differenz 
zurück erhält. Dies sagt 
schon die kaufmännische 
Logik und darin ist der 
Kunde wohl auch ein- 
sichtig. 


„Absahnen‘’ auf Kosten 
der Freaks? 


Es gibt viele Anwender, 
die den neuesten Rechner 
besitzen wollen und lange 
darauf gespart haben. Die 
Bestellungen bei einer 
Neuankündigung bewei- 
sen dies. Viele können 
das Gerät gar nicht rich- 
tig kennen, ordern jedoch 
bei ihrem Händler. In die- 
ser Zeit, es sind 3 bis 4 
Monate nach Ankündi- 
gung, macht der Herstel- 
ler das beste Geschäft. 
Mangels Konkurrenz 
kann „abgesahnt‘‘ wer- 
den. Haben sich erst ein- 
mal andere Firmen auf 
den Neuling eingestellt, 
muß schärfer kalkuliert 
werden und die Preise fal- 
len. Vergessen sind dann 
jene Käufer, die den 
ersten (fetten) Gewinn 
brachten. 

Aber gerade jene 
Freaks, die es wieder mal 
nicht abwarten konnten, 
„machen“ einen Compu- 
ter. Der Erfolg eines 
neuen Modells hängt im 
wesentlichen von einem 
Massenverkauf in den 
ersten Wochen ab. Erst 
dann wagen sich Soft- 
warefirmen an die Pro- 
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grammierung, erst dann 
werden Peripherieherstel- 
ler aktiv und erst dann 


wirkt die berühmte 
Mundpropaganda. Der 
umgekehrte Weg wäre 


also logischer: Erst ein- 
mal Niedrigpreise, um ein 
Produkt zu pushen, dann 
erst ein ehrlicher Gewinn 
mit vernünftiger Kalkula- 
tion. Wie dem auch sein, 
der schnellentschlossene 
Käufer ist der Dumme; 
abwarten muß man kön- 
nen. 


Was sollten die Hersteller 
tun 


Um ihre Reputation zu 
erhalten, sollten die Her- 
steller von Computern 
eine offenere Preisgestal- 
tung vornehmen. Bisher 
wurde die unverbindliche 
Preisempfehlung durch 
knallharte Rahmenbedin- 
gungen zu einer Preisvor- 
schrift. 

Zum zweiten sollten 
die Preissenkungen 
durchschaubarer werden. 
Nicht die 25 prozentigen 
Verbilligung nach einem 
halben Jahr, sondern der 
schnelle 5 bis 10 %ige 
Nachlaß bereits nach dem 
ersten oder zweiten 
Monat sind ehrlich. Dann 
könnte man wieder daran 


glauben, daß sinkende 
Herstellungskosten und 
Konkurrenzkampf sich 


sofort auf den Verkaufs- 
preis auswirken. Und das 
wäre fair. 

Bis dahin kann man 
jedem abraten, sich den 
neuesten Computer zu 
kaufen. Warten Sie erst 
einmal die Preissenkun- 
gen ab, die Fehlerkorrek- 
tur und des Erscheinen 
der ersten Updates. Vor 
allem aber befolgen Sie 
diesen Rat nicht. Die 
ndustrie braucht den 
Freak, auch wenn sie es 
nicht wahrhaben will und 
es ihm nicht dankt. 


REPORT 


LERNEN MIT 


DEM COMPUTER 


Es gibt sicher nicht viele Bereiche unserer 
modernen Industriegesellschaft, die von den Auswir- 


kungen der Informationstechnologie unberührt geblieben 


typ nicht gibt, erklärt 
auch einiges an diesem 
Zustand. 

CPC-User können aller- 
dings hoffen. Erste gute 
Ansätze (z.B. Fischer- 
technik) sind zu beob- 
achten. Nicht unerwähnt 
bleiben dürfen in diesem 
Zusammenhang auch die 
vielseitig einsetzbaren 


sind. Über das Für und Wider und den Einfluß auf den Programme dBase II und 
Menschen unserer Zeit ist viel diskutiert und 
geschrieben worden; die Entwicklung selbst führt aber, 
davon im wesentlichen unberührt, seit geraumer 
Zeit ein potentielles Eigenleben. Wie stehen nun die 
Schule und der Lern- und Erziehungsprozeß diesem 
Werdegang gegenüber? 


. Computer an den Schulen 
haben es schwer. Nicht 
nur die Anschaffungs- 
und Erhaltungshürde 
gilt es zu überwinden, 
vielen Lehrern fehlt es 
ganz einfach an ‚‚infor- 
mationstechnologischem“ 
Grundverständnis und 
so manchem Kollegen 
ist das „Fachwissen“ 
seiner Schüler eher ein 
Dorn im Auge. Stim- 
men, die den „Blech- 
freund“ ganz aus dem 
Bildungsgang fernhalten 
möchten, sind allerdings 
seltener geworden. 


VERSTÄNDNIS 
MITTLERWEILE 
VORHANDEN 


Kritiken dieser Art wur- 
den von der Entwick- 
lung an unseren Schu- 
len bereits überrollt. 
Ende 1984 beschloß 
nämlich die Bund-Län- 
der-Kommission für Bil- 
dungsplanung ein Rah- 
menkonzept zur „infor- 
mationstheoretischen 
Grundbildung“ und öffne- 
te damit den Weg für 
alle Schüler der Sekun- 
darstufe I, sich mit den 
„Neuen Medien“ ausein- 
andersetzen zu können. 
Große Anstrengungen 

in der Lehrerforbildung 
und die voranschreiten- 
de Ausstattung vieler 
Schulen mit den entspre- 
chenden Geräten lassen 
hoffen, daß wir den An- 
schluß an unsere europä- 
ischen Nachbarn nicht 
verpassen. 


Ein eigenständiges Fach 
„Informatik“ wird es 
allerdings in der notwen- 
digen Form nicht geben. 
Vielmehr setzen die 
Schulplaner auf eine 
Integration dieses Faches 
in den schon bestehen- 
den Fächerkanon. Com- 
puter als „Hilfsmittel“ 
und „Medium“ in einem 
möglichst breit angesie- 
delten Fächerspektrum 
heißt die „Zauberformel“. 
Vom „Vokabeltrainer“ 
in den Fremdsprachen 
bis zur „Modellsimula- 
tion“ in den geistes- und 
naturwissenschaftlichen 
Fächern soll die Palette 
reichen. 

Ob sich ein solches Kon- 
zept in der Alltagspraxis 
der Schulen realisieren 
läßt, hängt, neben der er- 
forderlichen Qualifika- 
tion der Lehrenden, ganz 
sicher vom bestehenden 
Schulsoftwareangebot 
ab, das z.Z. nur Apple 
und C 64-Eignern Anlaß 
zur Freude gibt. 


ZU WENIG CPCs 
IN DEN SCHULEN 


Wer nach Ursachen für 
dieses Manko sucht, , 
der sei auf die Verunsiche- 
rung der Softwareprodu- 
zenten durch die lang 
anhaltende Diskussion 
um Computer und Schule 
verwiesen. Die Tatsache 
aber, daß es mittlerweile 
an deutschen Schulen 
kaum einen Computer- 


Multiplan von „Markt 
und Technik“. 


LERNSOFTWARE 
FÜR DEN 
UNTERRICHT 


Inwieweit der Computer- 
einsatz am didaktisch rich- 
tigen Ort den Lernerfolg 
entscheidend erhöhen 
kann, darüber streiten 
sich die Gelehrten. Ge- 
sicherte wissenschaftliche 
Erkenntnisse zur Er- 
hellung dieser Frage wer- 
den auch noch einige Zeit 
auf sich warten lassen. 

Zu komplex ist der Unter- 
suchungsraum. Beobach- 
tungen aus der Schul- 
praxis bescheinigen den 
„Neuen Medien“ aber 
einen hohen Motivations- 
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schub, der sich sicherlich 
positiv auswirken kann. 


MATHEMATISCH- 
UND NATURWISSEN- 
SCHAFTLICHER 
BEREICH 


Mathematikern und Na- 
turwissenschaftlern wird 
seit langem eine nahe 
Verwandtschaft zur In- 


Noch dominiert die „Konkur- 
renz”, der Commodore C64, 
in der Schule 


formationstechnologie 
nachgesagt. Nicht zu un- 
recht. Seit einigen Jah- 
ren sind Schulcomputer 
in diesem Unterrichts- 
zweig im Einsatz. Lern- 
begleitende Programme 
zur Festigung und Übung 
im „Bürgerlichen Rech- 
nen“, Modellsimulatio- 
nen z.B. in Physik, Un- 
tersuchungen und Com- 
puterauswertungen zur 
Humanphysiologie im 
Biologieunterricht, 
Meßwerterfassung und . 
-auswertung im Fach 
Chemie oder auch Fall- 
studien im Geographie- 


unterricht kennzeichnen 
mögliche Einsatzorte. 
Grundsätzliches Umden- 
ken ist aber dringend von- 
‚nöten. Daß sich z.B. die 
Softwareangebote für 

das Fach Mathematik 
hauptäschlich auf den 
Übungs- und Anwen- 
dungsbereich beziehen, 
kann doch wohl noch 
nicht alles sein. In der ele- 


mentaren Geometrie z.B. 
bietet es sich doch gera- 
dezu an, Konstruktionen, 
Abläufe in der Bewegungs- 
geometrie (Abbildungen) 
oder auch die Erstellung 
komplexer Figuren auf 
dem Computer zu erzeu- 
gen. Dabei scheint mir 
der Einblick des Schülers 
in die Unterrichtsinhalte 
ebenso wichtig, wie seine 
Einsicht in die Beschrei- 
bung und Entwicklung 
des Programms selbst. 

In diesem Zusammen- 
hang sind die Autoren- 
systeme, die die Erstel- 
lung individuell angepaß- 
ter Lernsoftwar ermög- 
lichen, von besonderer 
Bedeutung. Unverständ- 
lich, daß sich auf diesem 


REPORT 


Gebiet die intimsten 
Kenner des Schulgesche- 
hens, die Schulbuchver- 
lage, nicht schon auf brei- 
ter Front engagiert 
haben. 


SPRACHLICHER 
BEREICH 


Vokabellernprogramme, 
Grammatiknachhilfen 
und Rechtschreibtrainer 
sind nicht selten kaufent- 
scheidend für die An- 
schaffung eines Heim- 
computers. Das breiter 
werdende Angebot und 
die wachsende Qualität 
dieser Programme lassen 
aber auch einen unter- 
richtlichen Einsatz sinn- 
voll erscheinen. 

Die Grenzen des Einsatz- 
gebietes ergeben sich im 
Unterricht von selbst, al- 
lein aus der Tatsache, 
daß Sprache in erster 
Linie gesprochene Spra- 
che ist, und da muß der 
stumme Trainingspartner 
passen. Selbst eine Laut- 
schriftangabe, z.B. im 
Englischen, ist wegen der 
vielen Sonderzeichen auf 
einem Rechner nur schwer 
zu realisieren. Was bleibt, 
reduziert sich auf einen 
notwendigen, aber oft als 
sehr stupide empfundenen 
„Wörter- und Strukturen- 
drill‘““, der durch das Me- 
dium Computer und ei- 
nen sinnvollen Dialog mit 
dem Programm (Fehler- 
analyse, Hilfestellungen 
usw.) neue Motivationen 
fördern kann. 

Was mir in allen Fächern 
für die CPCs im Augen- 
blick zu fehlen scheint, ist 
ein umfassendes Tutor- 
konzept, eine Programm- 
sammlung mit etwa fol- 
genden Titeln: ‚„Grund- 
wissen Chemie, Physik, 
Mathematik etc. oder 
auch ‚„‚Interpunktion 
leicht gemacht“. Entspre- 
chende Buchtitel sind 
seit langer Zeit mit ge- 
sicherten Auflagen auf 
dem Markt. 

Viel Kritik gegen den Ein- 
satz der „Neuen Medien“ 
im Schulunterricht kam 
aus den Reihen der Sozial- 
wissenschaftler im Bil- 
dungsbereich. Jene war- 
nenden Stimmen waren 


getragen von der Sorge 
um die Auswirkungen der 
Computertechnologie 

auf das Sozialverhalten 
der jungen Generation. 
Auch die Befürworter 

der Neuen Technologie 
an unseren Schulen räu- 
men ein, daß eine kriti- 
sche Auseinandersetzung 
mit diesem Unterrichts- 
medium notwendig ist. 
Dennoch muß die Frage 
erlaubt sein, ob der gesell- 
schaftswissenschaftliche 
Unterricht die phantasti- 
schen Möglichkeiten die- 
ses Mediums ungenutzt 
lassen kann. Ich glaube 
nein! Geborenen Skep- 
tikern sei gesagt, daß ge- 
rade in Fächern wie 
Sozialwissenchaft, Poli- 
tik oder auch Geschichte 
vielfältige Nutzanwendun- 
gen möglich sind. Ich den- 
ke da an Wahlhochrech- 


nungen (das Beispiel ei- 


GESELLSCHAFTS- 
WISSENSCHAFTLICHER 
BEREICH 


ee en 
nes Bremerhavener Gym- 


nasiums erregte 1983 
Aufsehen), anschauliche 
Darstellungen volks- 
wirtschaftlicher Modelle 
(Beispiel: Simulation des 
Geldumlaufs) oder auch 
die Verdeutlichung ge- 
schichtlicher Zusammen- 
hänge anhand eines Plan- 
spiels. Denn, was kann 
eine bessere Einsicht in 
die Zusammenhänge er- 
zeugen,als z.B. die Mög- 
lichkeit, an einem Com- 
puter (entsprechende 
Software vorausgesetzt) 
Auswirkungen von weit- 
reichenden politischen 
Entscheidungen direkt 
zu erfahren und entspre- 
chende Alternativen zu 
erproben? Derartige Si- 
mulationen in Form von 
Textadventures, die 

die relevanten histori- 
schen Eckdaten enthal- 
ten, sind z.B. in England 
bereits in den Software- 
bibliotheken der Schulen 
zu finden. Wie die weitere 
Entwicklung bei uns ver- 
läuft, so der Softwarever- 
antwortliche eines großen 
deutschen Schulbuchver- 
lages (auf Anfrage), hängt 
nicht zuletzt von der be- 
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m ee m m ame a ESSEN 


stehenden Nachfrage ab. 
Die bisher aufgezeigten 
Perspektiven waren lern- 
softwarebezogen in dem 
Sinne, daß sie sich auf 
Anwendungen im Unter- 
richt selbst bezogen.’ 

Wie steht es nun um Lern- 
oder auch Trainingspro- 
gramme für den Hausge- 
brauch, speziell für die 
bald 200 000 CPC-User? 
Der in Großbritannien 
anhaltende Boom im Lern- 
softwarebereich hat deut- 
sche Lande noch nicht 
oder nur in geringem Um- 
fang erreicht. Die Frage 
nach dem „Warum“ liegt 
wohl in dem Umstand 
begründet, daß man den 


LERNSOFTWARE FÜR 
DEN HEIMANWENDER 


Schneider CPC vielerorts 
noch nicht als ‚„‚Lernma- 
schine“ entdeckt hat oder 
ihn als solche nicht akzep- 
tieren will. Die Nachfrage, 
das ist sicher, bestimmt 
schließlich das Angebot. 
Leergefegt ist der Markt 
für die CPCs allerdings 
nicht. Ernstzunehmende 
Angebote an Lernsoft- 
ware findet man zu den 
sogenannten Hauptfächern 
mittlerweile in ausrei- 
chendem Maße. Das reicht 
von Vokabellernprogram- 
men über Grammatik- und 
Rechentrainer bis zu an- 
spruchsvollen Mathema- 
tik-Packs oder auch Recht- 
schreibeübungspaketen. 
Qualitative Unterschiede 
zwischen den einzelnen 
Anbietern machen es 

aber nicht unbedingt 
leicht, Programme zu fin- 
den, die den eigenen 
Wünschen entsprechend 
und zudem noch eine 
pädagogisch sinnvolle 
Konzeption aufzuweisen 
haben. Kaum ein Anwen- 
der hat selbst die Möglich- 
keiten und Sachkenntnis- 
se, geeignete Software 
praktisch zu vergleichen. 
Wer nicht gerade auf einen 
sachkompetenten Lehrer 
zurückgreifen kann und 
allen, die sich gerne erst 
informieren, bevor sie et- 
was kaufen, denen seien 
die Lernsoftwaretests in 
anelaet aktiv empfoh- 
en. 


ESISTDA:DAS 


nn AR 


Endlich ist das Handbuch 
zum Basic 2 des Schnei- 
der PC da. Wer sich 
darüber wundert, daß 
hierzu eine Buchbespre- 
chung stattfindet, dem 
sei verraten, daß dieses 
Manual extra gekauft 
werden muß und nicht 
dem PC, bzw. der Soft- 
ware, beiliegt. Die Zeiten 
scheinen vorbei zu sein 
in denen es zur voll- 
ständigen Lieferung ge- 
hörte, daß ein Pro- 
gramm (nichts anderes ist 
der . Basic-Interpreter) 
auch ordentlich doku- 
mentiert werden mußte. 
Aber dies sind Marketing- 
methoden. Hier soll es 
um die Frage, gehen ob 
sch der Kauf des 
Manuals lohnt oder ob 
man nicht lieber ein paar 
Mark drauflegen sollte 
und sich gleich ein Lehr- 
buch kauft. 


Eine Kleinigkeit fällt so- 
fort jedem auf, der ein- 
mal ein Manual zum CPC 
in der Hand hatte. Wie 
schon beim Handbuch 
zum PC hat man sich zu 
durchgehenden _Seiten- 
zahlen entschlossen. Und 
der guten Nachrichten 
sind noch mehr. Das In- 
haltsverzeichnis versucht 
den Text in drei Teile 
mit jeweils mehreren 


Ein Wunder ist geschehen: 
Seitenzahlen im Schnei- 
der Handbuch 


Kapiteln einzuteilen und 
bietet als letzten Ab- 
schnitt sogar einen ver- 
nünftigen Index. Man 
kann nunmehr ein Stich- 
wort suchen und auf der 
entsprechenden Seite 
nachlesen. Ironischerwei- 
se muß man derlei Luxus 
bei Schneider feiern, galt 
es doch bisher, sich an 
die eigenwillige Eintei- 


___SERVICE 


HANDBUCH 


Buch 2) Schneider S12K Personal Computer 


lung ausschließlich in 
Kapitel zu gewöhnen. 
Neben positiven 
Selbstverständlichkeiten 
aber auch eine haarige 
Kritik. Kaum ist das 
Handbuch ausgepackt fal- 
len dem Käufer satte 17 
Korrekturenseiten in die 
Hand, nur notdürftig mit 
einer Heftklammer zu- 
sammengehalten. Um un- 
nötige Fehler zu vermei- 
den, sollte man sich die 
Seiten im Buch einmal 
ankreuzen, damit man 
später noch weiß: „Da 
war doch noch was...“. 
Die sonstige Aufma- 
chung des Buches ist nor- 
mal, bzw. entspricht dem 
Standard. Die 360 Seiten 
haben das Format des 
PC Handbuches, sind 
aber mit einem Plastik 


Spiralband gebunden. 
Zum Arbeiten ist dies 
praktischar und die 


Lebenserwartung dürfte 
entsprechend höher sein. 
Basic 2 wendet sich so- 
wohl an all jene, die noch 


keine „ersten Schritte‘ in 
der Programmiersprache 
unternommen haben, als 
auch an die Erfahreneren. 
Da es sich zwar nicht um 
eine neue Sprache, aber 
doch um einen neuen 
Dialekt und Interpreter 
handelt, sollte man sich 
den ersten Teil, der als 
Einleitung gedacht ist 
nicht ersparen. Es gelingt 
hier trotz aller Kürze 
einen Überblick über die 
Möglichkeiten von Basic 
2 zu geben. Sogar einige 
Übungsbefehle sind mit- 
geliefert. 

Ernst wird es dann im 
Teil II, den Grundzügen 
des Programmierens. Das 
Kapitel sei insbesondere 
den Einsteigern empfoh- 
len, die noch nie mit 
(irgendeinem) Basic zu 
tun hatten. Auf die Schil- 
derung des umfangrei- 
chen Befehlssatzes kam 
es den Autoren nicht an. 
Vielmehr wurde versucht 
ein gefälliges Lehrbuch 
zu schaffen, ohne aller- 
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dings neue Wege zu 'ge- 
hen. So beginnt der Text 
wie bei jedem anderen 
Basic-Kurs mit „Print...“ 
und stellt auch Aufgaben 
zu den jeweiligen Lektio- 
nen. Das Thema hätte 
sicherlich nicht so trok- 
ken werden müssen, aber 
andererseits sorgen einige 
Beispiele für die nötige 
Kurzweil. Lobenswert ist 
es, daß auch der struktu- 
rierten Programmierung 
einige Seiten gewidmet 
werden. Basic 2 bietet in 
dieser Beziehung ja viel 


Komfort und man sollte 


sich von Anfang an daran 
gewöhnen, die Programme 
übersichtlich zu gestalten. 
Recht geschickt lassen 
die Autoren dann den 
Stoff in Teil III schwieri- 
ger werden, auch hier 
wieder unter besonderer 
Berücksichtigung der Pro- 
grammstruktur. Genauer 
geht man auch auf Varia- 
ble, arithmetische Aus- 
drücke und String-Opera- 
toren ein. Im wesentli- 
chen wird hier der erste 
Teil wiederholt, das gilt 
auch für die Ausgabe von 
Text und Grafik, jedoch 
ist der Text erläuternder 
und umfangreicher. Auch 
die  Beispielprogramme 
sind dem Wissen ange- 
paßt und haben mehr 
Umfang. Am Ende dieses 
Kapitels darf man schon 
von sich behaupten, mit 
seinem Basic-Interpreter 
umgehen zu können. 


Leckerbissen des Basic 2 
Direktzugriffs- und 
Schlüsseldateien 


Die letzten Feinheiten 
des Locombotiv-Basics 
sind im Teil IV beschrie- 
ben, und diese Seiten 
wenden sich auch direkt 
an den Fortgeschrittenen, 
bzw. an jene, die bis sich 
hierhin durchgearbeitet 
haben. Es geht um die 
Direktzugriffsdateien mit 
all ihren Eigenheiten und 


um die Schlüsseldateien. 
Gerade in diesen Ab- 
schnitten erweisen sich 
die Beispielsprogramme 
als äußerst brauchbar, da 
nicht jeder gewohnt ist 
solche Dateitypen unter 
Basic zu erstellen. 
Schließlich ist der Fehler- 
behandlung ist ein relativ 
kurzes, aber ausreichen- 
des Kapitel gewidmet, 
ebenso wie der Erläute- 
rung von Mehrbenutzer- 
systemen. 

Zu guter Letzt finden 
sich 5 verschiedene An- 
hänge, die aber teilweise 
besser hätten ausfallen 
können und für die man 
sich einige Seiten mehr 
Umfang wünscht. Trotz- 
dem gefiel die übersicht- 
liche Aufteilung, die das 
Nachschlagen leicht 
macht. Eine Ordnungs- 
liebe, die man bei Schnei- 
der-Manuals nicht ge- 
wohnt ist und die deshalb 
hier positiv hervorgeho- 
ben werden kann. 


Fazit: Kein Manual, son- 
dern Lehrbuch 


Das Handbuch Basic 2 ist 
sicher nicht das Optimum 
dessen, was man von 
einem Lehrbuch zu einer 
Programmiersprache er- 
warten kann, dazu ist der 
Text etwas zu trocken. 
Das Thema ist jedoch er- 
schöpfend ausgearbeitet. 
Lobenswert sind die vie- 
len Beispiele, die — ein- 


mal abgetippt — eine 
nützliche Programm- 
bilbiothek ausmachen. 
Sie sind für individuelle 
Bedürfnisse leicht abzu- 
ändern. 

Die Korrekturblätter 


sind jedoch Anlaß zur 
Kritik. Scheinbar war bei 
Andruck nicht genug Zeit 
das Korrekturlesen abzu- 
warten und man reichte 
das Ergebnis dieser Ar- 
beit lieber nach. Hätte 
man dazu etwas mehr 


arbeiten 


Händlern 


SERVICE 


Ruhe verwendet, wäre 


sicher auch der unsinnige 
Satz gestrichen worden in 
dem es so schön heißt: 


„Wartungs- und Service- 
müssen von 


Schneider-autorisierten 
durchgeführt 


An dieser Stelle unser 
Bezugsquellennachweis 
(in alphabetischer Rei- 
henfolge). Nachdem er 
in der letzten Ausgabe 
zwar angekündigt, aber 
nicht gedruckt wurde, 
ist er diesmal etwas län- 
ger geworden. Wir wol- 
len hier keine Gratiswer- 
bung — es finden sich 
auch die Vertreiber jener 
Soft- und Hardware, die 
bei uns nicht auf Gegen- 
liebe stieß — machen, 
aber ein Testbericht ist 
völlig sinnlos, wenn wir 
nicht auch mitteilen, wo 
das Besprochene zu be- 
ziehen ist. Leider können 
nicht alle Händler berück- 
sichtigt werden, die die 
Ware im Sortiment füh- 
ren. 


Aliens (3/87) 

Hacker Il (6/87) 
ACTIVISION Deut- 
land GmbH 

Postfach 760680 
2000 Hamburg 


WARLORD (SPEZIAL 
2/87) 

MURDER ON THE 
ATLANTIC (6/87 
HIVE (6/87) 
ARIOLASOFT GMBH 
POSTFACH 1350 

4830 Gütersloh 


Data Becker Führer 
— CPC (5/87) 
Profipainter (4/87) 
Data Becker 


Merowingerstr. 30 
4000 Düsseldorf 


werden“. Vielleicht soll 
dies aber auch bedeuten, 
daß der Händler nunmehr 
als kleinen Service die 
Druckfehler korrigiert. 
Spaß beiseite. das 
Handbuch zum Basic 2 
ist sicherlich die :59,— 
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Schneider CPC-Star- 
Texter (3/87) 


SYBEX-Verlag GmbH 
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CopyMan (6/87) 
Data Berger 

Im Lichtenfelde 76 
4790 Paderborn 


Zorgos (Spezial 2/87) 
Deltacom Hard- u. 
Softwarevertrieb 
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4100 Duisburg 


CPC LEARN - Ma- 
schinensprache (5/87) 
CPC-Macro Assembler 
(6/87) 

Holtkötter Versand 
Albert-Schweitzer- 
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2000 Hamburg 70 


Computer-Abenteuer 
Das Adventurebuch 
zum CPC 


Hüthig Verlag 
ISBN 3-7785-1235-8 


Quadjet 9000/Colour- 
printer 
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Europa Lernsoftware 
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Vertrieb nur über 
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Durenver 
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(3/87) 
PRS8-Soft 
Erbachshof 1 
8702 Eisingen 


plus 
prom Assembler 
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DM wert, die dafür ver- 
langt werden. In dieser 
Preislage mag es andere 
Bücher zum gleichen 
Thema geben, ob sie aber 
ebenso grundlegend wie 
Prsrhöpiend sind, ist frag- 
ic 


Gauntlet (4/87) 
Infiltrator (5/87) 
Tarzan (Spezial 2/87) 
Breakthru (Spezial 
2/87) 

Arkanoid (6/87) 

Big Trouble in Little 
China (6/87) 
RUSHWARE GmbH 
An der Gümpgesbrücke 
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7101 Flein 
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‚zubehör (5/87) 


Völkner Elektronik 
Postfach 53 20 

3300 Braunschweig 
und 

Woltermann Elektronik 
3414 Hardegsen 


Supercopy (5/87) 
Mirage Imager (6/87) 
WEESKE 


Potsdamer Str. 10 
7150 Backnang 


TEST 


CPC-MACRO 


Zwei wesentliche Faktoren führten zum Test des CPC-Macroassemblers 
der Firma Holtkötter. Zum einen läuft in Schneider aktiv ein Maschinen- 
sprache-Kurs, der großen Anklang findet. Wir wiesen zu Beginn darauf 
hin, daß zwar viel vom Maxam (Eprom)-Assembler die Rede sein wird, 
jedoch sei jedes andere, einigermaßen leistungsfähiges Programm ebenso 
zu nutzen. Viele fragten nach einem entsprechenden Bericht: Hier ist er. 


Wir stellten in der vergangenen 
Ausgabe den Lernkurs zum Thema 
Maschinensprache vor, der aus der 
gleichen Softwareschmiede stammt. 
Dabei deckten wir einige Mängel 
auf, die nur deshalb zu vertreten 
waren, weil die Programmierer auf 
ihren professionelleren Macroas- 
sembler verwiesen. Wer bereits et- 
was in die Maschinensprache hinein- 
gerochen hatte, der schreckte wohl 
hauptsächlich vor dem Preis zurück 
und fragte gleich nach dem Nach- 
folger: hier ist er. 

Geliefert wird der Macroassemb- 
ler in der üblichen, luxuriösen 
Buchhülle zusammen mit einem 
ausführlichen Handbuch. Der gegen- 
wärtige Preis von 138,— für die 
Diskettenversion ist zwar an der 
oberen Grenze, könnte aber ge- 
rechtfertigt sein, wenn das Pro- 
gramm den Leistungsbeschreibun- 
gen entspricht. 


Betrieb unter CP/M für 
alle CPCs und den Joyce 


Der CPC-Macroassembler arbeitet 
unter CP/M und wurde gleich in 
zwei Versionen geliefert. Eine da- 
von gilt für den CPC 464, die an- 
dere läuft auf den Rechnertypen 
664/6128 und sogar auf dem 
Joyce. Derartige Vielfalt setzt na- 
türlich eine jeweils andere Tasten- 
definition voraus, die der Benut- 
zer erst einmal selbst installie- 
ren bzw. aufrufen muß. Schließ- 
lich kann der Verlag nicht wis- 
sen, welcher Computer letztlich 
benutzt wird. Auf der B-Seite 
kommen einige Beispielprogramme 
sowie ein kleiner, aber ausbau- 
fähiger Basiccompiler hinzu. Dann 
jedoch kann es losgehen, entspre- 
chend dem Handbuch nach Auf- 
ruf der Tastaturbelegung und dem 


jeweiligen COM-File für den jewei- 
ligen Rechnertyp. 


Editor: Extrem leistungsfähig 
mit angenehmen Eigenheiten 


Bereits bei CPC-Learn konnten die 
Programmierer ihre Vorliebe zur 
Sprache Forth nicht verleugnen 
und auch bei „Macro“ finden sich 
deutliche Hinweise. Für Käufer, 
die sich mit dem Übungseditor 
in die Maschinensprache eingearbei- 
tet haben, ist dies sicherlich nütz- 
lich, aber auch alle anderen werden 
schnell die Verwandschaft schätzen 
lernen, bietet sie doch erhebliche 
Vorteile. 

Erster positiver Punkt ist die 
Programmverwaltung des Editors. 
Er unterteilt längere Programmtex- 
te in sogenannte „Screens“, also 
Bildschirmseiten. Jede dieser Seiten 
umfaßt ein kByte und wird ohne 
Benutzung des Betriebssystems auf 
die Diskette abgespeichert. Die 
Größe solch eines Programmtextes 
ist dann nur abhängig von der 
Diskettenkapazität. Innerhalb einer 
Seite kann dann jedoch editiert 
werden, als hätte man ein Text- 
verarbeitungssystem vor sich. Die 
Kursorbewegungen werden dabei 
in Verbindung mit der Citrl- 
Taste gesteuert, eine von Word- 
Star her bekannte und gewohnte 
Programmbedienung. Zur Verbin- 
dung zwischen den einzelnen 
Screens läßt sich vor- oder zurück- 
blättern. Diese Verwaltung dient 
jedoch nicht nur der Bequemlich- 
keit. Mit Hilfe einer Kopier-Op- 
tion können größere Programme 
umgeordnet werden, um Platz für 
neue Seiten zu schaffen oder um 
Duplikate anzulegen. 

Ein Nachteil dieser Bildschirmsei- 
ten soll jedoch nicht verschwiegen 
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ASSEMBLER 


werden. Durch die unübliche Spei- 
cherung — das Betriebssystem wird 
ja nicht in Anspruch genommen — 
muß man Systemdisketten und 
Screen-Disketten streng auseinan- 
derhalten. Die Programmtexte 
(wohlgemerkt nicht das fertig as- 
semblierte Programm) können nur 
von einer dieser „Spezial‘“ Daten- 
träger eingelesen werden, da bei 
einer frisch formatierten Diskette 
alle Screens mit einem lInitiali- 


Feinheiten durch Labels und 
Macros 


sierungsmuster beschrieben werden. 

Mit Ausnahme einiger anschlie- 
ßend besprochenen Funktionen 
hält sich der Assembler an die 
übliche Syntax. Er erlaubt Kom- 
mentare hinter den Befehlen (ord- 
nungsgemäß durch Semikolon abge- 
trennt) und verarbeitet selbstver- 
ständlich namentlich gekennzeich- 
nete Unterprogramme. Mit letzte- 
rem, den sogenannten „Labels“ 
ist der erste Schritt zur struktu- 
rierten Programmierung getan. Aber 
hier bietet „Macro“ mehr. 


Strukturierte Programmierung 
und Bottom-Up Struktur 


Für das erste Screen jedes Pro- 
grammtextes wird ein Programm- 
kopf verlangt. Wie logisch dieser 
aufgebaut ist und wie sehr er die 
Arbeit erleichtert, zeigt folgendes 
Beispiel: 
‚PROGRAMM DEMO 
‚SCR 100 ;Unterprogramm 
(Screen 100) 
.SCR 30 ;Hauptprogramm 
(Screen 30) 
‚END 


Wenn man gewohnt ist, in einem 
Programmkopf lediglich die Unter- 
programme aufzurufen, dann 
spricht man auch von einer Bot- 
tom-Up Struktur des Programmes. 
An sich wäre dies noch nichts 
besonderes, aber bei „Macro“ kann 
jeder Screen einzeln assembliert 
und getestet werden. Selbst den 


fertigen Maschinencode kann man 
dann noch einbinden. 

Das eigentliche Assemblieren ist 
äußerst bequem. Man ruft nur 
vom Hauptmenue die Option auf 
und gibt jenes Screen an, in dem 
der Programmkopf verzeichnet ist. 
Alles andere erledigt das Programm. 
Fehlerfreie Texte (wann gibt es 
die schon mal?) werden rasch 
übersetzt und mit Länge des Codes 
sowie der der Startadresse an- 
gegeben. Das Programm kann dann 
als COM-Datei abgespeichert wer- 
den. 

Wichtiger ist jedoch das Ver- 
halten bei Fehlermeldungen. Hier 
stoppt das Programm und gibt 
eine von 69 möglichen Fehler- 
kennzahlen und die betreffende 
Zeilennummer aus. Die Anzahl 
der Fehlermeldungen sagt schon 
einiges darüber aus, wie einfach 
das Entwanzen der Quelltexte wird. 
Zudem meldet sich mit dem näch- 
sten Tastendruck noch der Editor 
und der Kursor ist in der fehler- 
haften Zeile. Diese Fehlerkorrek- 
tur bietet der CPC ansonsten nicht 
einmal unter BASIC. 


Wie der Name schon verspricht: 
Makrodefinition 


Es gibt gerade in der Maschinen- 
sprache häufig wiederkehrende Be- 
fehlsfolgen, die man gerne nur 
einmal definieren möchte, soge- 
nannte Makros. Diese Makros wer- 
den allerdings bei jedem Befehls- 
aufruf neu assembliert und nicht 
etwa wie ein Unterprogramm mit 
einem CALL angesprungen. Der 
große Vorteil ist die Parameter- 
übergabe, wovon beim vorliegenden 
Programm 10 möglich sind. Zu- 
dem können bereits definierte Ma- 
kros in neuen Definitionen be- 
nutzt werden und rekursive Auf- 


TEST 


rufe sind gestattet. Wegen der 
verwirrenden Möglichkeiten ist die- 
ser Bereich der Assemblerprogram- 
mierung sicher nur etwas für den 
fortgeschrittenen Programmierer, 
muß jedoch positiv vermerkt wer- 
den. 


Compilerbau — Spezialgebiet 
vonCPC MACRO 


Bei einfacher Makrodefinition 
denkt man natürlich auch bald 
schon an den Bau eines eigenen 
Compilers. Nicht, daß dies hier 
zur Pflicht wird, aber die Grund- 
voraussetzungen sind ja gegeben. 
Theoretisch muß man nur die ge- 
wünschte Routine, etwa den 
PRINT-Befehl, in eine Definition 
packen und schon ist der Com- 
piler fertig. Schwierigkeiten wären 
hier arithmetische Ausdrücke, also 
mathematische Formeln machen, für 
die „Macro“ einen eigenen Parser 
vorschlägt. Es handelt sich dabei 
wiederum um die „Umgekehrt 
polnische Notation‘ (Postfixnota- 
tion), die bereits aus dem CPC- 
Learn Assembler bekannt ist. Wer 
also damit in die Maschinenspra- 
che einstieg, wird sich nicht schwer- 
tun, ansonsten ist ein wenig Übung 
vonnöten, um mit der Syntax zu, 
rechtzukonımen. 

Zum Programm wird als Extra 
ein BASIC Compiler mitgeliefert, 
der für einfache Zwecke ausge- 
richtet ist. Mit dem Assembler 
ist es jedoch ohne weiteres mög- 
lich, diesen mehr und mehr aus- 
zubauen und auf die eigenen 
Bedürfnisse zuzuschneiden. In der 
vorliegenden Version sollte sich 
allerdings niemand allzu großen 
Hoffnungen hingeben. Der Tiny- 
BASIC Compiler (Winzig-BASIC) 
verdient seinen Namen zu recht, 
ist allerdings auch nur als gefälli- 
ge Beigabe und für Übungszwecke 
gedacht. 


Das Handbuch: 
Ausführlich an der falschen Stelle 


So sehr wir vom Programm ange- 
tan waren, das Handbuch gab 
— wie schon bei CPC Learn — 
den dicksten Ansatzpunkt zur Kri- 
tik und das in noch größerem 
Ausmaß. Dabei fehlt es bei Holt- 
kötter nicht an gutem Willen, 
denn das Buch ist mit dem Ta- 
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recht 
sowohl von Einband 
und Druckqualität her ausgezeich- 


schenbuchformat 
reich und 


umfang- 


net. Aber es scheint, als hätte 
sich der Autor nicht zwischen 
Programm-Manual und Lehrbuch 
entscheiden können. 

Die Programmhandhabung 
nimmt nur 9 Seiten in Anspruch, 
obwohl für den Großteil der Käufer 
dies wohl die wichtigsten Seiten 
dürften. Geradezu winzig (eine 
dreiviertel Seite) fällt in diesem 
Teil die Beschreibung der Assem- 
blierung aus und es hilft auch nicht, 
wenn man die 2 Seiten der auf- 
gelisteten Fehlercodes hinzurech- 
net. Mehr und Grundlegenderes 
gibt es dann zum Thema Struk- 
turierung zu lesen, wobei man- 


ches wohl überblättert werden 
wird. Beim Anwender von ‚Ma- 
cro“ darf einiges vorausgesetzt 


werden, zumal es sich bei dem 
Programm ja um die professio- 
nelle Version des CPC-Learn han- 
deln soll. 

Am unangenehmsten wirkt sich 
allerdings das fehlende Stichwort- 
verzeichnis aus. Platz dazu wäre 
vorhanden gewesen, wenn man 
darauf verzichtet hätte den Quell- 
code des Tiny-BASIC Compilers 
zu drucken. 


Fazit: CPC-MACRO, 
ein echter Profi 


Am Macroassembler von Holtkötter 
— er entstand übrigens bei der 
RVS Datentechnik — ist nichts 
mehr zu verbessern. Einige seiner 
Optionen, bzw. die Makrodefini- 
tion, zielen genau auf die Gruppe 
der fortgeschrittenen MC-Program- 
mierer, die mit diesem Programm 
sicherlich auch ihre helle Freude 
haben werden. Aber auch dem- 
jenigen, der nur über einige Grund- 
techniken dieser Sprache beherrscht 
kann „Macro“ weiterhelfen, denn 
die Bedienung ist einfach und 
hält sich im wesentlichen an die 
inoffiziellen Normen. Einige Ab- 
weichungen zum üblichen, etwa 
die Screen-Verwaltung, sind nicht 
etwa hinderlich, sondern von Nut- 
zen. 

Einziger Schwachpunkt — dies 
muß noch einmal gesagt werden — 
ist das allzu schlechte Handbuch, 
dem wohl von Seiten der Ent- 
wickler nicht viel Bedeutung bei- 
gemessen wurde. 


GBASE-DATENBANK! 


FÜR DEN PC 1512 


Dateiverwaltungen gehören zu den 
wichtigsten Aufgaben eines Arbeits- 
computers. Der Programme dafür 
gibt es viele. Wir testeten für Sie auf 
dem Schneider PC das neue GBase 
von SPI. 


Auf der CeBit in Hannover wurde 
das jüngste Produkt der Firma 
SPI eifrig bestaunt. GBase lief 
in einer Testversion und überzeugte 
die Besucher durch seine einfache 
Bedienung unter GEM. Die Be- 
quemlichkeiten, die die Mausbe- 
nutzung bei einer Datei mit sich 
bringen kann, sind zwar nichts 
Neues, jedoch handelte es sich 
beim vorgestellten Produkt um 
eine relationelle Datenbank, die 
sowohl für allereinfachste Zwecke 
als bis hin zum professionellen 
Bereich Nutzen bringen sollte. 
Als wir Mitte April das Programm 
zum Testen bekamen, waren wir 
natürlich gespannt. Vorerst handel- 
te es sich bei den zwei Disketten 
um eine Vorabversion (jedenfalls 
formulierte SPI in diesem Sinne), 
und das Handbuch lag nur als 
Referenzmanual vor und sollte 
noch Korrektur gelesen werden. 
Bei Erscheinen dieser Ausgabe 
dürften jedoch die Arbeiten ab- 
geschlossen und GBase im Handel 
sein, geplant ist der Auslieferungs- 
termin Ende April/Anfang Mai. 

Das Besondere an dieser neuen 
Dateiverwaltung ist die Einbindung 
in die GEM-Umgebung. Es wird 
unter anderem die Grafikfähigkeit 
des Desktops genutzt und natür- 
lich die damit verbundene ein- 
fache Bedienung mit der Maus. 
Dabei hängt die Speicherkapazität 
für Daten im wesentlichen nur 
vom vorhandenen Datenträger ab. 
Anwender eines großen „Kartei- 
kastens“ sollten also eine Fest- 
platte bevorzugen. Abgesehen von 
der maximalen Dateigröße macht 
sich bereits die GEM-Handhabung 
bei zwei Laufwerken unangenehm 


bemerkbar. Von der Grundkonfi- 
guration mit nur einer Disketten- 
station ist gänzlich abzuraten. 


Einfache Installation 
auf Harddisc 


Gehen wir aber einmal von der 
Harddisc aus, dann ist als erstes 
das Programm hierzu zu installie- 
ren. GBase macht es da dem An- 
wender einfach. Nach Anklicken 
des Installationsprogrammes arbei- 
tet dieses selbständig und fordert 
lediglich einmal zum Disketten- 
wechsel auf. Die ganze Prozedur 
dauert jedoch ungewöhnlich lange 
und kann ängstliche Gemüter um 
die Festplatte bangen lassen. Einige 
Bildschirmmeldungen zu den gerade 
ausgeführten Arbeiten wären sicher- 
lich angebracht. Irgendwann einmal 
befindet sich das Programm (samt 
Beispielsdatei und Hilfstexten) 
dann im GEMMAPPS-Ordner und 
kann von dort aus aufgerufen 
werden. Dateien, die erstellt werden 
können natürlich in jeden belie- 
bigen Ordner abgelegt werden, 


hierzu reicht die Kenntnis des 
GEM Desktops aus. 
Etwas komplizierter gestaltet 


sich die Arbeit dann mit zwei 
Laufwerken, was nicht unbedingt 
Schuld des Softwareverlages ist. 
Es beginnt halt schon mit dem 
umständlichen Laden von GEM 
und endet erst dann mit der An- 
lage einer separaten Datendiskette. 


Anlegen einer Datei mit 


Fenstertechnik und Mausbedienung - 


GEMblich präsentiert sich die 
Datenbank nach dem Einladen mit 
einer oberen’ Menuezeile, in der 
die Pull Down Menues aktiviert 
werden können und maximal zwei 
Fenster. Eines davon trägt den 
Titel „‚Neuabfrage‘‘ und dient dem 
Dialog mit dem Datenbanksystem, 
ein anderes, darunterliegendes bein- 
haltet die Daten. Beide Windows 
werden erst später relevant, sind 
aber stets zu sehen. 
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Auswahl der Feldart und -Typen als 
Beispiel für die Menueführung mit der 
Maus 


Jeder Erstbenutzer wird nach 
dem Programmstart eine Datei an- 
legen müssen. Hierzu wird eine 
(von mehreren möglichen!) Bild- 
schirmmasken aufgebaut. Mit der 
eigentlichen Datei hat dies noch 
nichts zu tun, denn hier wird nur 
die Eingabe- und Ausgabeform der 
Daten festgelegt. Der Vorgang ist 
dank der Maus so einfach wie 
nur eben möglich. Man stelle 
sich ein leeres weißes Blatt Papier 
vor, auf das man die Titel jedes 
Datenfeldes einträgt. Das Feld 
selbst erhält einen Rahmen, in 
dem während des Aufbaus die 
Zeichenanzahl zu sehen ist. 

Diese Angaben — Anzahl und 
Größe der Felder — sind normaler- 
weise verbindlich, aber da man 
sich ja noch im Planungsstadium 
der Datei befindet, neigt man zu 
Fehlern. Man vergißt zum Beispiel 
bei einer Adreßdatei das Feld 
„Telefon“ oder wählt ganz einfach 
die Zeichenlänge des Namensfeldes 
zu gering. Bei GBase spielen derlei 
Irrtümer keine Rolle. Sämtliche 
Felder können auf dem Bildschirm 
verschoben werden, bis eine über- 
sichtliche Darstellungsform erreicht 
ist. Die jeweilige Größe kann 
geändert werden, ebenso wie der 
Titel des Feldes. Wem der Platz 
einer Bildschirmseite nicht aus- 
reicht, der kann ein zweites Fen- 
ster eröffnen. Die Bequemlichkeit 
und die Präsentation des Daten- 
satzes lassen schnell den üblichen 
Aufwand zu Maskenerstellung ver- 
gessen und man fragt nach den 
Leistungen. 

Zu jedem Datenfeld sind mehrere 
Parameter möglich, welche die spä- 
tere Eingabe- oder Suchfunktionen 


erleichtern oder die nur zur bes- 
seren Optik beitragen. Ausgewählt 
werden diese in einem Unterme- 
nue durch Maussteuerung und An- 
klicken der gewünschten Option. 
Einige Standardbelegungen sind da- 
bei schon hervorgehoben, können 
aber geändert werden. Wie üblich 
schließt jedoch die Anwahl be- 
stimmter Befehle andere aus (etwa 
die Formeleingabe bei Texten), 
welche dann auch nicht angeklickt 
werden können und deshalb in 


Nach der Übernahme des Systemdatums 
Zugang zur Datenbank 
Schattenschrift 
werden. 

Zur Dateihandhabung gehören 


einer dargestellt 


die Festlegung als Schlüsselfeld 
(oder Primärschlüsselfeld), der Feld- 
typ (Text, Datum, Nummer, Ja/ 
Nein-Fels oder Dezimalzahl). die 
Formelzuweisung und die Eingabe- 
bedingungen (Pflicht, Übernahme, 
Überspringen). Das Datum kann 
dabei selbstverständlich auch vom 
Betriebssystem übernommen wer- 
den, so daß für diese Eintragung 
keine weitere Arbeit entsteht. Nicht 
unbedingt notwendig, aber dafür 
sehr reizvoll, sind die grafischen 
Gestaltungsmöglichkeiten einer 
GBase Bildschirmmaske. Der Text 
der Datenfelder kann links- oder 
rechtsjustiert werden, oder er wird 
zentriert untergebracht. Als Schrift- 
typen stehen Fett- und Schräg- 
schrift zur Verfügung, wobei je- 
weils unterstreichen möglich ist. 

Die fertige Bildschirmmaske ist, 
wie bereits erwähnt, nur eine von 
mehreren möglichen. Fehler lassen 
sich direkt in dieser „Parameter- 
datei“ ändern, wenn man es nicht 
vorzieht, eine zweite aufzubauen 
und die Anzahl oder Größe der 
Felder zu ändern. Somit ist auch 
zu erklären, warum die vorein- 
gestellte Datenanzahl bei 25 Sät- 
zen besteht. Diese Zahl kann 
jederzeit, ist das Konzept des 
Anwenders erst einmal ausgereift, 
erhöht werden. 


Letztlich geht es um die Eingabe 
von Daten und dazu ist bei GBase 
der zweite Dateityp nötig, die 
Datenbank. Sie enthält die eigent- 
lichen Adressen (um bei unserem 
Beispiel zu bleiben). Damit ist 
man dann schon mittendrin in 
der Dateibearbeitung und hier geht 
es um die beiden Fenster, dem 
Neuabfrage- und dem Datenfenster. 
Das Neuabfragefenster verwirrt den 
Anfänger wahrscheinlich noch am 
meisten. Alle Optionen können hier 
mit der Tastatur eingegeben werden 
und es scheint so, als verlange 
GBase auch diese Texteingaben, 
denn ständig blinkt darin der Text- 


kursor. Wer jedoch weiterhin die 


Datentabellen und 
Dialog im GEM-Fenster 


Pull Down Menues aktiviert und die 
entsprechenden Befehle in den Pull 
Down Menues anklickt, wird sehr 
bald feststellen, daß es sich dabei 
nur um eine schriftliche Bestätigung 
dieser Optionen handelt. Lediglich 
einige Parameter, etwa bei der 
Suche die jeweilige Zeichenfolge, 
sind dann von Hand einzugeben. 
Im GBase Konzept hat die Maus- 
bedienung prinzipiell Vorrang. 

Sind bereits Daten vorhanden 
werden diese in einer Reportform 
im unteren Fenster aufgelistet. 
Wie immer bei GEM liegt dieses 
Fenster nur als Rahmen über der 
Datentabelle und kann verschoben 
werden, falls dies notwendig ist 
Dazu benutzt man die entspre- 
chenden Symbole des Windows, wie 
man es bereits vom Desktop her 
gewohnt ist. Aktiviert man dann 
einen Datensatz, so wird ein zweites 
Fenster aufgebaut und mit Hilfe 
der Bildschirmmaske kann editiert 
werden. Den geänderten Datensatz 
sollte man dann mit der Funktions- 
taste F10 auf dem Datenträger 
fixieren. Mit dieser Maske läuft 
natürlich auch der Eingabemodus 
ab, der dann beendet wird, wenn 
das Datenfenster angeklickt wird. 
Bereits während dieser Eingabe wer- 
den die gewünschten Parameter 
berücksichtigt. 

Das System dieser veränderbaren 
Bildschirmmasken macht es auch 
möglich, in eine bestehende Datei 
die Daten aus einer anderen hin- 
zuzulesen. Und obwohl alles rei- 
bungslos verläuft, bietet GBase eine 
aufgefeilte Prüfroutine an, um si 
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Re, FEN RR 
cherzustellen, daß die neue Daten- 
bank auch alle gewünschten Feder 
enthält. Ein eigener Programmteil 
ist die Pflege einer Datei, wobei 
die gesamte Datenbank nur als 
Tabelle ausgegeben ist und nur 
editiert werden kann, auf Neu- 
einträge muß dabei allerdings ver- 
zichtet werden. 


Abfrage und Suchbedingungen 


Leicht zu handhaben 


Die Qualität jeder Datenbank steht 
und fällt mit den Suchbedingun- 
gen und deren Verknüpfungen, und 
spätestens hier sollte die deutsche 
Benutzerführung von GBase loben- 
de Erwähnung finden. Dem An- 
wender dürfte erst hier auffallen, 
daß er bereits bisher mit einer 
Abfrageform gearbeitet hat, näm- 
lich der „VON:Dateiname‘“ Ab- 
frage, deren Ergebnis eben eine 
komplette Datei ist. Zum geziel- 
ten Suchen kann diese Abfrage 
noch durch mehrere, verknüpfte 
Feldnamen ergänzt werden, denen 
dann mit dem Zusatz „WOBEI“ 
eine Bedingung angehängt wird. 
Diese Bedingung kann sich auch 
auf ein Feld beziehen, welches 
nicht ausgegeben werden soll. Ein 
nicht ganz selbstverständlicher Vor- 
teil. Die eigentlichen Bedingungen 
dagegen entsprechen dem (wohlsor- 
tierten) Standard. Da gibt es 
„größer“ und „kleiner“, „größer 
gleich“ und „kleiner gleich“, 
„gleich“ und „ungleich“, „nicht“, 
„in“, „ähnlich“ und schließlich 
„wie“. Verknüpft werden die Be- 
dingungen wahlweise mit „und“ 
oder „oder“. Auch die auf diese 
Weise selektierten Daten können 
gleich sortiert werden. Setzt man 
die Suchfunktionen innerhalb eines 
Reports ein, dann können die 
herausgefilterten Daten auf Dis- 
e oder Drucker abgeleitet wer- 
en. 

Für Zahlenfelder steht eine be- 
sondere Option bereit, die Kurz- 
analyse. Ohne eine Formel zu 
konstruieren, kann neben der Sum- 
me aller Einträge in einem ausge- 
wählten Feld auch der niedrigste 
und höchste Eintrag gesucht wer- 
den und es werden der Mittel- 
wert und die Standardabweichung. 
berechnet. 


Bitte lesen Sie weiter auf Seite 95 


Eh 


SERIE 


WIR PROGRANMIEREN 
INMASCHINENSPRACHE 


Was das Programm 
BASFIRM — so hatten 
wir eine kleine Maschi- 
nenroutine in der letzten 
Ausgabe getauft — tut, 
können Sie sich mit den 
kleinen Basicdemonstra- 
tionsprogrammen vorher 
(vor den Erklärungen) 
nun einmal ansehen. Sie 
brauchen diese nur abzu- 
schreiben und laufen zu 
lassen, denn diese kleinen 
Programme befinden sich 
nicht auf unseren Soft- 
bx-Disketten/-Kassetten. 

Vorher aber müssen 
Sie das Programm BAS- 
FIRM.HEX (Bild 1) lau- 
fen lassen und dann erst 
eines der in den Bildern 
2 bis 4 enthaltenen. 

Nun zu den Erklärun- 
gen des Programmes 
BASFIRM. Wie wir Ihnen 
schon mitgeteilt hatten, 
dient dieses Programm 
dazu, die Firmware-Rou- 
tinen (Firmjumps) auch 
von Basic aus aufrufen zu 
können. Sie brauchen 
lediglich die Parameter 
für den Akku und für die 
Register zu übergeben. 


Grundlagen für diese 
Routine 


Die Reihenfolge der 
Parameter konnten Sie 
ebenfalls dem letzten 
Heftentnehmen.DamitSie 
sich diese Folge besser 
merken können, habe ich 
die Routine so aufgebaut, 
daß die Übergabereihen- 
folge alphabetisch zu er- 
folgen hat. Nach dem 
Aufruf des Programmes 
mit Call &A000 haben 
die Parameter für A, BC, 
DE, HL und dann die 
Routine die Sie aufrufen 
wollen, zu folgen. 


109 
112 
129 
139 
149 
159 
169 
170 
182 
199 
200 


’BASFIRM.HEX 


FOR i 


GOTO 228 


MEMORY &9FFF:f$="Fehler in Zeile * 
a=s&A0DOD:e=-&AB1C:zb=1999:e=e+il 

=a TO e:READ d$ 

IF LEFT$(d$,1)="&" THEN flag -1 

IF (flag AND ps<>VAL(d$)) THEN 239 
IF (flag AND i=e) THEN END 

IF flag=2 THEN 299 
i=i-1:zb=zb+t1:ps=9:d$="":flag = 2 


d$="&"+d$:POKE i1,VAL(d$) 


ED,S3,1A,A2,DD,66,23,DD, &941d 
6E,22,DD,56,95,DD,5SE,24,&02e7 
DD,46,97,DD,4E,26,DD, 7E, &03b6 


218 ps=ps+VAL(d$) 

228 IF i < e THEN NEXT i 

230 PRINT f$:zb+1:END 

2228 DATA 

2981 DATA 

20092 DATA 

22023 DATA 88,CD,4D,BC,C9,&92a7 


Bild 1: Das Ladeprogramm BASFIRM.HEX bringt das Maschi- 
nenprogramm in die richtigen Speicherstellen und prüft 
auf grobe Fehler in den Datazeilen. 


HL-Register 


122 "Wackleri 

119 

1228 MEMORY &7FFF 

132 "a=AKKU bc=BC-Register 

148 ’de=DE-Register hl = 

159 

169 a=d:bc=&1iFF:de=&205:hl=&AQF 

178 einsprungadr=&BC4D 

189 

198 ’Aufruf der Routine SCR HW ROLL 
222 FOR i = 1 TO 198 

218 bc=&iFF 

228 CALL &A288,a,bc,de,hl,einsprungadr 
239 bc=9 \ 
248 ° 

250 CALL &AB®Q,.a,bc,de,hl,einsprungadr 
268 NEXT i 


Bild 2: Das Programm bringt die Bildschirmdarstellung schön 


zum zittern. 


Bei CALL-Aufrufen kön- 
nen insgesamt 32 Para- 
meter mitgegeben wer- 
den. Alle Parameter kön- 
nen dann IX-indiziert ab- 
geholt werden. An später 
folgenden Beispielen kön- 
nen Sie sehen, wie die 
Parameter für diese Regi- 
ster übernommen wer- 
den. 


Das Firmware-Handbuch 
zu den Schneider-Com- 
putern ist zwar eine 
Fundgrube an guten und 
hilfreichen Einsprung- 
adressen für Maschinen- 
programmierer, aber 
Basicprogrammierer kön- 
nen nur wenig damit an- 
fngen. Der Grund ist 
darin zu sehen, daß bei 
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einigen Routinen in den 
Registern verschiedene 
Werte zu übergeben sind, 
bzw. die Antworten auf 
verschiedene Einsprüngein 
den Registern stehen und 
der Basicprogrammierer 
diese Werte nicht ausle- 
sen kann. Während das 
Programm BASFIRM 
zwar den Aufruf von 
Firmware-Routinen er- 
laubt, ist es bisher nicht 
möglich, Werte, die nach 
Abschluß der Firmware- 
Routine in den Registern 
stehen, abzuholen. 


Auch für Basicprogram- 
mierer nutzbar 


Mit dem in Bild 5 zu 
sehenden Maschinenpro- 
gramm kann aber nun 
jeder Basicprogrammierer 
nicht nur die Firm- 
ware-Einsprünge ausnut- 
zen und auch die erfor- 
derlichen Parameter mit- 
geben, sondern auch Wer- 
te, die nach dem Aufruf 
in den verschiedenen Re- 
gistern stehen, „abholen“. 

Wir haben diese Rou- 
tine FJUMP (Kurzform 
von Firmware-Jump = 
Firmware-Sprung) ge- 
nannt. Diese Routine 
wird als RSX-Befehl ein- 
gebunden. 


Beschreibung des Assem- 
blerprogrammes 


FERIENSERIE NERREENEER 
Ganz oben stehen kurze 
Hinweise über den Pro- 
grammnamen, den Sinn 
usw. Danach steht die Be- 
merkung, daß Festlegun- 
gen und Definitionen fol- 
gen. Darunter wird dem 
Label LOGEXT der Wert 
&BCD1 zugewiesen. An 
Adresse &BCD1 ist der 
Firmware-Einsprung zum 
Einbinden eines externen 


Befehls (KL-LOG- 
EXT). Durch Ansprung 
dieser Adresse können 
RSXen (also Befehlser- 
weiterungen) in den Be- 
fehlssatz eingebunden 
werden. 

Zur Einbindung wer- 
den ganz bestimmte For- 
derungen gestellt. Im BC- 
Register muß der Zeiger 
auf der Sprungtabelle 
stehen. Im HL-Register 
wird ein Zeiger auf einen 
4 Byte langen RAM-Spei- 
cher gefordert, den der 
CPC für die Erweiterun- 
gen benutzen darf. Dieser 
Teil steht unter der Be- 
merkung RSXen einbin- 
den. Nach den schon ge- 
nannten Wertübergaben 
in das BC- und HL-Regi- 
ster wird die Routine 
LOGEXT aufgerufen und 
das Programm kehrt zu 
Basic zurück. Dieser Vor- 
gang wird als Initialsi- 
rung bezeichnet, deshalb 
der Labelname ‚INIT“. 

Danach finden Sie im 
Assemblerlisting Daten 
zur Verwaltung der RSX- 
en. Beim Label JTABLE 
(Jumptable = Sprungta- 
belle) steht NAMTAB. 
Der Adreßwert von 
NAMTAB wird vom 
Assembler automatisch 
zugewiesen. Der Assem- 
blerprogrammierer 
braucht sich darum nicht 
zu kümmern. Danach 
steht der Befehl JP 
FJUMP (Springe nach 
FJUMP). Auch dieser 
Adreßwert wird vom 
Assembler selbst einge- 
fügt. Danach folgt dann 
die Namenstabelle (NAM- 
TAB). Alle RSX-Befehls- 
worte müssen in Groß- 
buchstaben geschrieben 
sein, und beim letzten 
Buchstaben muß als 
Endekennzeichen noch 
&80 (Dezimal 128) 
addiert werden. Folgen 
weitere RSX-Befehls- 
namen, so gilt dies alles 
auch für diese. Das Ende 
der Tabelle muß mit 
einer Null gekennzeich- 
net werden. Unmittelbar 
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1290 
112 
122 
139 
149 
152 
162 
178 
182 
199 
220 
218 
228 
239 bc=0 
240 ° 

250 
260 


’'wWackler2 
’ 


MEMORY &7FFF 
’a=AKKU 
’'de=DE-Register 
’ 


FOR i = 
bc=&2039 


1 TO 19 


NEXT i 


bc=BC-Register 


hl = HL-Register 


a=-d:bce=&1FF:de=-&205:hl=&APF 
einsprungadr=&BC59 

’ 

"Aufruf der Routine SCR HW ROLL 


CALL &A222,a,bc,de,hl,einsprungadr 


CALL &ABOB,a,bc,de,hl,einsprungadr 


Bild 3: Nur ein paar Werte geändert und schon ergibt sich ein 


anderer Effekt. 


’DIRECTORY 
9 


MEMORY &7FFF 
"a=AKKU 
’'de=DE-Register 
, 


FOR i = 
bc=&2939 


1 TO 18 
bc=® 
‚ 


NEXT i 


be=BC-Register 


hl = HL-Register 


a=d:bc=&1FF:de=&8000:hl1=&AQF 
einsprungadr=&BC9B 

, 

’"Aufruf der Routine SCR HW ROLL 


CALL &ABBDd,a,bc,de,hl,einsprungadr 


CALL &AP89,.a,bc,de,hl,einsprungadr 


Bild 4: Der gleichen Maschinenroutine andere Werte überge- 
ben und es erfolgt die Ausgabe des Inhaltsverzeichnis- 
ses der Diskette oder Kassette. 


daran anschließend folgt 
die Zuweisung der 4 
Bytes zur Verwaltung 
(KERNEL defs 4). 

Beim Label FJUMP 
beginnt das eigentliche 
Programm. Der letzte 
Parameter, der beim Auf- 
ruf übergeben wurde 
steht im DE-Register und 
ist die Einsprungadresse 
der Firmware-Routine, 
die ausgeführt werden 
soll. Sie wird deshalb 
gleich in die beiden Spei- 
cherplätze hinter dem 
Label EINSPR geladen. 


Dadurch wird bei Aus- 
führung der Routine 
beim Label EINSP ein 
CALL Firmware-Routine 
durchgeführt. Die ande- 
ren mitgegebenen Para- 
meter werden nach dieser 
Aktion in die Register 
HL, DE, BC und A ge- 
laden. Nach diesen 
Operationen stehen alle 
mitgegebenen Werte so in 
den Registern, wie sie be- 
nötigt werden. Das ist der 
erste Teil des Program- 
mes. Bis hierhin ist alles 
auch in etwa identisch 


ART. 
EX 


mit dem Programm BAS- 
FIRM, nur daß die 
Maschinenroutine dies- 
mal mittels RSX-Befehl 
aufgerufen werden kann. 
Der zweite Teil dient da- 
zu, die Register-Inhalte 
nach der Programmaus- 
führung in den Speicher- 
stellen ab &a046 abzu- 
legen. 

Da nicht jeder einen 
Assembler besitzt, haben 
wir in Bild 6 ein entspre- 
chendes Ladeprogramm 
abgedruckt, mit welchem 
der Maschinencode in die 
entsprechenden Speicher- 
stellen geschrieben wird. 
Nach der Initialisierung 
durch CALL &A000 
steht die RSX-Erweite- 
rung FJUMP zur Ver- 
fügung. Der Aufruf zur 
Einbindung darf nur ein- 


Ladeprogramm statt 
Assembler 


mal erfolgen, ansonsten 
verweigert der CPC 
irgendwann plötzlich den 
Dienst. An einem Beispiel 
wollen wir aufzeigen, wie 
diese Routine nun von 
Basic aus benutzt werden 
kann. Siehe hierzu Bild 7. 

Das Programm in Bild 
7 holt die Werte für 
SPEED KEY ab und gibt 
sie auf dem Bildschirm 
aus. Die Registerinhalte 
wurden nach dem eigent- 
lichen Programmaufruf in 
dafür reservierten Spei- 
cherstellen abgelegt und 
können von Basic aus 
ausgelesen werden. Wo 
die Wertablage beginnt 
und an welcher Position 
die Inhalte für die Regi- 
ster stehen, ergibt sich 
aus der alphabetischen 
Reihenfolge. Die Spei- 
cherstelle, an welcher der 
erste Wert steht, ist 
&A046. 

Diese Adresse habe ich 
im Programm FJDEMO 
der Variablen SA (Start- 
adresse zur Abholung der 
Werte) zugeordnet. Da 
die Ablage immer in der 
Folge Low-/High-Byte ge- 
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EIETEETETELFETETETSERETETSLTETETSFETRERPEEFTETPERRFERERFFTFT) 
FR FJUMP.EDI (c) 1987 by Lothar Niedel 1 


+# Basic-Aufruf von Firavare-Spruengen. Die Parameter werden # 
s» in der Reihenfolge Akku, BC,DE,HL,Einsprung uebergeben. 3 
;# Die zurueckgegebenen Registerinhalte koennen durch PEEK # 


;# von Basic aus abgefragt werden. 


PRLLIELSESELSERFFSESERETESSERESERSERSESERRERRETEETERSESRIETER 


LOGEIT EQU LBCDI 
AUS (A088) ORG LAU 
;RSIen einbinden 
’ 
A000 H1 0A A INT Id be,JTABLE ;Zeiger auf Sprungtabelle 
A321 15 AS Id hi,KERNEL ;Zeiger auf Hilfsspeicher 
A066 CD DI BC call LOGEIT ‚Befehle einbinden 
19 (9 ret sRuecksprung -) Basic 
‚Daten zur Verwaltung der RSXen 
AUSh SEA JTABLE defw NAMTAB 
AC (3 19 AS jp  EIWMP 
AUSE 46 44 55 AD NAMTAB defa "FJUM® 
113 D8 defb "Pr+&ö4 sFJUMp 
Mu Mb defb 448 ;Tabel lenende 
1015 (#484) KERNEL defs 4 sRAN zur Verwaltung 
A019 ED53 3340 FIWMP Id (sprung),de ;Einsprungadresse merken 
As1D DD 66 83 Id h,lin83)  ;HL-Vert 
A028 DD 6E 02 Id I,(ix#2) ;holen 
4023 DD 56 65 Id d,tin#5) ;DE-Vert 
A026 DD 5E 84 ld e,(in44) ;holen 
M29 DD 46 97 Id b,tin#7) ;BC-Vert 
A82C DD 4E 66 Id c,(in#6) ;holen 
M2F DD TE 18 Id a,lix#8) ;iInhalt des Akku holen 
sAlle Paraneter sind nun vorhanden 
132 CD EINSPR defb &cd ‚Code fuer Call 
433 (8482) SPRUNG defs 2 ;Hier steht Adresse 
NS 5 push af sAF-Vert auf Stack 
A036 ED 43 48 AS ld (ber, be ;BC-Inhalt -Iber 
AU3h ED 53 4A AS Id (der),de ;DE-Inhalt -)der 
AU3E 22 AC AB Id (hir),hl sHL-Inhalt -hir 
MM El pop hl sAF-Vert holen 
A842 22 46 AB Id (afr),hl sund in Nerker 
A845 (9 ret ‚zurueck -) Basic 
A846 (0882) AR defs 2 
A048 (6682) BR defs 2 
ABA (8982) DR defs 2 
AU4C (6882) HR  defs 2 
AB4E (AB4E) end 


Bild 5: Assemblerlisting: FJUMI 


schieht, sind die Wert fol- 
gendermaßen abgelegt: 


SAt0=F SAt1=A 
SA+2=C SA+3=B 
SA+4=E SA+5 =D 
SA+6=L SA+7=H 


Wollen Sie den Inhalt 
des Doppelregisters DE 
haben, so muß die 
Abfrage lauten: 
DE=PEEK(SA+5)*256* 
PEEK(SA+4). 


100 


"FJUMP.HEX 


650 a=&EA000:e=&A047:zb=1000:e=e+1 
660 FOR i -a TO e:READ d$:IF LEFT$(d$, 1) 
="E" THEN flag -1 


670 IF (flag AND 
"Fehler in Zeile 
680 IF (flag AND 
690 IF flag THEN 


ps<>VAL(d$)) THEN PRINT 
"zb+1:END 

i=e) THEN END 
i=-i-1:zb=zb+1:ps-0:d$=" 


":flag = 0:60T0 730 
700 d$="&"+d$:POKE i,VAL(d$) :ps=ps+VAL(d 


$): 


730 IF i < e THEN NEXT i 


1001 


DATA 


01,0A,A0,21,15,A0,CD,D1,6031F 
BC,C9,OF,AO,C3, 19,A0,46,&03F6 
4A,55,40,00,00,00,00,00,&01BC 
00,ED,53,33,A0,DD,66,03,6&0359 
DD,6E,02,0D0,56,05,0D,5E,&03C0 
04,0D,46,07,DD,4E,06,DD, &033C 
7E,08,CD,00,00,F5,ED,43,&0378 
48,A0O,ED,53,4A,AO,22,4C,60380 
AD,E1,22,46,A0,C9,00,00,60352 


: Ladeprogramm für FJUMP 


110 

MEMORY &3FFF 
’a=AKKU 
‘de=DE-Register 


"FJ-DEMO / SPEED KEY-Werte holen. 


bc=BC-Register 


hl = HL-Register 


a=-0:bc=0:de=0:hl=0: sa=&6A046 
einsprungadresse=&BB42 
’ 


IFJUMP,a,bc,de,hl,einsprungadresse 
h=PEEK( sa+7) :1=PEEK( sa+6) 
PRINT"Startverzoegerung: 
PRINT"Wiederholungsperiode: 


"h 
"ı 


Bild 7: Demonstrationsprogramm zur Abholung der Werte für 


SPEEK KEY 


Ich hoffe diese Anga- 
ben reichen für Sie aus. 
Am besten ändern Sie die 
Programme 2 bis 4 derart 
ab, daß Sie in Verbin- 
dung mit FJUMP arbei- 
ten und dann sollten Sie 
(falls Sie das Firmware- 
Handbuch haben) versu- 
chen, ein wenig mit dem 
Programm FJUMP zu 
experimentieren. 


Der Remkiller 


Wie im letzten Heft ver- 
sprochen, nun ein kleines 
Utility, also ein kleines 
nützliches Anwendungs- 
programm. Viele Pro- 
gramme, die später ver- 
ändert werden sollen, 
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werden mit entsprechend 
vielen Bemerkungen 
(REMarks) versehen. 
Auch bei Programmver- 
öffentlichungen sind zum 
Zwecke der Erklärungen 
sehr häufig viele Bemer- 
kungen enthalten. 

Diese Zeilen nehmen 
aber Platz im Speicher 
des CPC und auch auf 
den Disketten weg. Will 
oder muß man — aus 
Kapazitätsgründen _ 
diese Zeilen entfernen, 
dann wäre es oft sehr 
mühsam, es von Hand 
selbst zu tun. Ein kleines 
Maschinenprogramm er- 
ledigt dies in Windeseile 
für uns. 

Bevor ein solches Pro- 
gramm aber geschrieben 
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128 ’REMKILL fuer CPC 664/6128 

652 a=&ABPQ:e=&AB88:zb=1000d:e=e+1 

668 FOR i =a TO e:READ d$: IF LEFT$S(d$,1) 
="&" THEN flag =1 

672 IF (flag AND ps<>VAL(d$)) THEN PRINT 
"Fehler in Zeile "zb+1:END 

68% IF (flag AND i=e) THEN END 

692 IF flag THEN i1=i-1:zb=zb+1:ps=9:d$=" 
":flag = 8:G0OTO 738 

700 d$="&"+d$:POKE 1,VAL(d$):ps=ps+VAL(d 
$): 

7382 IF i < e THEN NEXT i 

1091 DATA 01,0A,AQ,21,93,A2,C3,D1,8&0393 
1202 DATA BC,C9,0F,A,C3,17,AQ,52, 20408 
10293 DATA 45,4D,4B,49,4C,CC, 00, 2A, &0268 
1094 64,AE,23,22,8B,A®,2A,66,&0312 
1095 AE.22,89,A8,2A,8B,A®,DD, &942B 
19206 2A,8B,A®,DD,46,01,DD, 4E, &03A4 
1297 00,ED,43,8D,A®,ED,4A, 22,&03B6 
1098 8F,AQ®,ED,SB,8B,Ad,DD, 7E, &@4FD 
1299 24,FE,C5,CA,S5,ABd,2A,8F,&043F 
1219 A®,22,8B,A®,3A,8D,A,FE,&90452 
1011 22,C8,C3,1E,A®,2A,66, AE, &0387 
1912 ED,SB,8D,A2,ED,52,22,89,&045F 
1013 A®,2A,66, AE,ED,SB,8F,A®,&0455 
1914 ED,52,22,91,A2,2A,8F,A®, &03EB 
19015 ED,SB,8B,A®,ED,4B,91, Ad, &84DC 
1916 ED,B2, 22,66, AE, 22,68, AE, &040B 
1217 22,6A,AE,22,6C,AE,C3,4C, &0385 
1918 AB, LODAR 


Bild 8: REMKILL für CPC 664/6128 (Ladeprogramm). 


129 'REMK464 

6589 a=&kABQOQV:e=& A088: zb=-100d :e=e+1 

669 FOR i =a TO e:READ d$: fF LEFT$(d$,1) 
z"&" THEN flag =-1 

678 IF (flag AND ps<>VAL(d$)) THEN PRINT 
"Fehler in Zeile "zb+1:END 

680 IF (flag AND i=e) THEN END 

699 IF flag THEN 1=1-1:zb=zb+1:ps=9:d$=" 
":flag = 2:GOTO 739 

728 d$="&"+d$:POKE i,VAL(d$):ps=ps+VAL(d 
%: o 

738 IF 1 < e THEN NEXT i 

12091 DATA 01,0A,A®,21,93,A2,C3,D1,&28393 

1222 DATA BC,C9,0F,A2,C3,17,A0,52,&0400 

1203 DATA 45,4D,4B,49,4C,CC, 00, 2A, &08268 

1924 DATA 81,AE,23,22,8B,A®,2A, 83, &934C 

1295 DATA AE,22,89,A®,2A,8B,A®,DD, &842B 

1026 DATA 2A,8B,A,DD,46,21,DD,4E, &83A4 

1227 DATA 20,ED,43,8D,Ad,ED,4A, 22,&083B6 

10088 DATA 8F,AQ,ED,SB,8B,A2,DD, 7E,&84FD 

1229 DATA 84,FE,CS,CA,55,A®,2A,8F, &B843F 

1018 DATA A®,22,8B,A®,3A,8D,A®,FE,&98452 

1211 DATA 290,C8,C3,1E,Ad,2A,83, AE, &03A4 

1212 DATA ED,5SB,8D,A®,ED,52,22,89, &845F 

1913 DATA A®,2A,83,AE,ED,S5B,8F, A, &9472 

1914 DATA ED,52,22,91,AQ,2A,8F,AQ, &83EB 

1215 DATA ED,5SB,8B,A®,ED,4B,91, Ad, &94DC 

1916 DATA ED,B2,22,83,AE, 22,85, AE, &0445 

1917 DATA 22,87,AE,22,89,AE,C3,4C, &83BF 

1918. DATA A, &LOQAD 


Bild 9: REMKILLER in der Version für den CPC 464 als Hex- 
\ Iader. 


werden kann, muß man 
bestimmte Dinge über die 
CPCs wissen. Als erstes 
ist zu erwähnen, daß bei 
den CPCs ein frisch ge- 
ladenes Programm anders 
im Speicher steht als ei- 
nes, das schon einmal ge- 
laufen ist. Alle CPCs ver- 
ändern beim Programm- 
lauf die Programme, um 
noch schneller bei der 
Programmausführung zu 
sein, als sie es ohnehin 
schon sind. Das bedeutet: 
Ein Programm, aus wel- 
chem die REM-Zeilen ent- 
fernt werden sllen, darf 
noch nicht „gelaufen“ 
sein! Weiterhin muß man 
wissen, daß sich der CPC 
464 von seinen beiden 
Brüdern etwas unterschei- 
det. Deshalb gibt es zwei 
Versionen des REM-Ent- 
ferners, eine für den CPC 
464 und eines für den 
CPC 664/6128. 

Aus Platzgründen kön- 
nen wir das Assembler- 
listing erst im nächsten 
Heft abdrucken. Deshalb 
folgt auch erst in diesem 
dann die genauere Be- 
schreibung. Trotzdem 
sollen Sie aber zumindest 
mit den Programmen 


schon arbeiten können. 
Deshalb finden Sie die 
beiden Lade-Programme 
als Hexlader in Bild 8 
und 9. Vergessen Sie 
nicht, vor dem Lauf des 
Hexlader-Programmes 
MEMORY &J9IFFF einzu- 
eben und nach dem feh- 
erfreien Lauf mit CALL 
&A000 die Initialisierung 
durchzuführen. Außer- 
dem sollten Sie auch 
daran denken, daß das 
Programm, aus dem die 
Bemerkungszeilen ent- 
fernt werden sollen, noch 
nicht gelaufen sein darf. 
Der Aufruf zur Entfer- 
nung ist: 
„Senkrechter 
REMKILL 


Strich“ 


Entfernt werden nur die 
Zeilen, bei denen REM 
unmittelbar auf die Zei- 
lennummer folgt. Andere 
Zeilen mit REM bleiben 
erhalten. Dadurch kön- 
nen REM-Zeilen, die im 
Programm erhalten blei- 
ben sollen, ausgespart 
werden. Zeilen mit dem 
Hochkomma anstelle von 
REM werden ebenfalls 
nicht entfernt. 

(LM) 


®9,Jährlich werden 
in der Bundesrepublik 
ca. 40000 behinderte 
oder von Behinderung 
bedrohte Kinder 


geboren.99 


Rita Süssmuth, 
Bundesministerin für Jugend, Familie, Frauen und Gesundheit 


Nur für den Fall, 
daß Sie jemand 
fragt, warum Sie 
für die Deutsche 
Behindertenhilfe- 
Aktion Sorgen- 
kind spenden 
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240 


das Konto der 
Hilfe, bei allen 
Postämtern, 
Banken und 
Sparkassen 


N 


Bas 


DAS 
PASCAL 


SUPERLATIVE 


SERVICE 


Basic ist nicht gerade die schnellste Computersprache, dafür aber leicht zu 
erlernen. Wer mit seinem CPC professioneller arbeiten will, kommt um 
eine schnellere Hochsprache nicht herum. Eine davon ist Pascal, die wieder- 
um noch schneller mit Turbo wird. Wir testeten für Sie daher Turbo-Pascal. 


Über fast keine Programmierspra- 
che ist in letzter Zeit soviel geredet 
worden wie über Turbo Pascal. 
Unter Schneider-Freaks hat es sich 
inzwischen herumgesprochen, daß 
„Turbo“ — wie Pascal-Kenner ver- 
einfachend sagen — auch für die 
CPCs erhältlich ist und deren Grafik- 
eigenschaften voll unterstützt. Und 
das zu einem beinahe sagenhaften 
Preis: Unverbindliche Preisempfeh- 
lung des deutschen Turbo-Lizenz- 
inhabers Heimsoeth Software ist 
DM 250,— inklusive Grafikerweite- 
rung. Was also ist dran an Turbo, 
us es so viele Anwender gefunden 
at? 


Umfangreiches Handbuch 


Zunächst drängt sich ein nahe- 
liegender Verdacht auf. Nachdem 
Turbo Pascal 1985 zum „Software- 
Ereignis des Jahres‘ ernannt wor- 
den war, wurde ein ziemlich hefti- 
ger Reklamerummel betrieben. 
Auch in manchen Fachzeitschriften 
wurde es aufs Höchste gelobt. Was 
man von solchen ‚‚Tests‘ halten soll 
und kann, dürfte inzwischen klar 
sein. Nicht selten steckt hinter ei- 
nem Testergebnis lediglich ein po- 
tenter Anzeigenkunde. Um Turbo 
objektiv beurteilen zu können, gab 
es also nur eins: kaufen und testen. 

Der optische Eindruck des Pakets 
war durchaus positiv. Neben der 
Diskette fand sich darin ein fast 
400-seitiges „Compilerhandbuch“ 
sowie ein kleines Addendum über die 


Schneider-Grafikroutinen. Das 
Handbuch geht ausführlich auf die 
Struktur von Pascal sowie in einem 
gesonderten Abschnitt auf spezielle 
„Eigenarten‘“ unter CP/M ein. Vor- 
kenntnisse sollte man allerdings 
schon besitzen, denn es ist kein 
Lehrbuch. Für diesen Zweck näm- 
lich gibt es ein weiteres Software- 
Paket, den Turbo Tutor. (Wobei 
allerdings gesagt werden muß, daß 
man Pascal auch auf andere Weise 
lernen kann.) Für erfahrene Anwen- 
der präsentiert sich das Handbuch 
als sehr aufschlußreich, ordentlich 
gegliedert und in einer leicht ver- 
ständlichen Sprache abgefaßt. 
Anders dagegen die Ergänzung zu 
den Grafikroutinen. Jede Prozedur 
ist nur durch ein paar Worte erläu- 
tert, und allzu oft findet man lapi- 
dare Hinweise auf das BASIC- 
Handbuch. Die Routinen sind zwar 
in der Tat identisch; wer sich je- 
doch zuvor nicht mit dem CPC- 
BASIC befaßt hat, empfindet das 


Raubkopien sind unrentabel 


Studium zweier Handbücher zur 
gleichen Zeit doch als sehr lästig. 
An einer Stelle im Addendum hat 
sich sogar ein Fehler eingeschlichen, 
der Anfängern erhebliche Schwie- 
rigkeiten bereiten dürfte. (Siehe 
den Artikel „Fehler in Turbo- 
Graphix“ in dieser Ausgabe!) 

Als nächstes also erst einmal 
Diskette eingelegt und eine Siche- 
rungskopie gezogen. Zur Freude des 
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Benutzers gelingt das ohne Kom- 
plikationen — was mit ein Grund 
dafür ist, daß sich von Turbo Pascal 
bereits zahlreiche Raubkopien im 
Umlauf befinden. Jedoch sind der 
ohnehin niedrige Preis und die aus- 
führliche Dokumentation, bei der 
Fotokopieren fast unrentabel wird, 
ein Hindernis für die Cracker. 

Nach getaner Arbeit der erste 
Test des Editors. Er ist Wordstar- 
kompatibel und vollständig auf den 
CPC integriert worden. Wer noch 
nie auf einem PC unter Wordstar 
gearbeitet hat, muß sich erst ein- 


Kein Diskettenwechsel — 
Systemabsturz 


mal an die Tastaturbelegung ge- 
wöhnen, obwohl die Cursortasten 
des CPC weitgehend benutzer- 
freundlich umdefiniert wurden. So 
z.B. die Taste „Pfeil nach oben“: 
allein gedrückt bewegt sie den Cur- 
sor in die nächste Zeile, mit CTRL 
wird eine Seite vorgeblättert, und 
mit SHIFT springt man ans Text- 
ende. Analoges gilt für die drei rest- 
lichen Pfeiltasten. Diese Belegung 
plus DEL zum Löschen von Zei- 
chen genügt für die ersten Experi- 
mente; die übrigen Tasten (mit so 
nützlichen Funktionen wie etwa 
Block kopieren oder Textbaustein 
von Datei einlesen) lernt man mit 
der Zeit kennen. 

Auf eine Eigenart von CP/M wird 
in einem Beiblatt hingewiesen. Bei 
Diskettenwechsel ist es nötig, das 
Laufwerk: neu anzumelden, da das 
System sonst beim ersten Schreib- 
versuch abstürzt. Man ist dennoch 
geneigt, es zu vergessen. Der Autor 
hat bei dieser Gelegenheit sein 
erstes Turbo-Programm ‚elegant 
vernichtet. Ein Trost für Vergeß- 
liche: Spätestens nach einem knap- 
pen Dutzend vergebens eingetipp- 
ter Programme ist Ihr Gedächtnis 
wenigstens in dieser Hinsicht fit! 

Etwas enttäuschend wirkt die 
Meldung des freien Speicherplatzes 
auf dem Bildschirm: knapp 8 
KBytes! Trotzdem können Sie län- 
gere Programme schreiben. Turbo- 
Pascal kann nämlich auch auf ein 
COM-File compilieren. Das Pro- 
gramm wird dann unter CP/M 
ausgeführt und — wenn Sie es mit 
dem RUN-Befehl gestartet haben — 
lädt nach Beendigung automatisch 
Turbo nach. Wenn Ihnen dann der 
Speicherplatz immer noch nicht 


ausreicht, können Sie Overlays ein- 
bauen. Das sind Prozeduren, die nur 
bei Bedarf geladen werden und an- 
sonsten keinen Speicherplatz weg- 
nehmen — oder wenigstens nur so- 
viel, wie die größte Overlay-Proze- 
dur benötigen würde. Es geht aber 
noch weiter. Dann nämlich, wenn 
der Speicher ein Programm trotz 
Overlay-Technik nicht mehr fassen 
würde, können Sie auf Chain-Datei- 
en ausweichen. Chain-Files sind 
Turbo-Programme ohne „Runtime 
Library‘, die nur von anderen Pro- 
grammen aus aufgerufen werden 
können. Ein Programm mit einem 
Gesamtumfang von 100 K und 
mehr ist dadurch problemlos zu rea- 
lisieren. 

Was aber kann Turbo Pascal ei- 
gentlich? Es ist jedenfalls eine ganze 
Menge, so daß hier nur das Wichtig- 
ste aufgeführt werden soll. Da ist 
zum einen die Möglichkeit, untypi- 
sierte Parameter zu verwenden. Sie 
ist jedoch nur für erfahrene Pro- 
grammierer von Nutzen. Der Ein- 
satz nicht typisierter Files kann 
schon eher mal vorkommen, z.B. 
um nachzuprüfen, ob eine Datei 
(beliebigen Typs) überhaupt vor- 
handen ist. 


Beispielprogramme 


Als Nächstes sind die typisierten 
Konstanten zu nennen. Durch sie 
wird es möglich, z.B. ein Array 
komplett vorzubelegen, sogar mit 
selbst definierten Typen. Hierzu 
ein Beispiel: 

PROGRAM turbotest; 

TYPE 
farbe = (rot, orange, gelb, 
grün); 
zeit= 1.15; 

CONST 
ampelphase = ARRAY (zeit) 
OF farbe 
= (rot, rot, rot, rot, rot, 
orange, orange, grün, grün, 
grün, grün, grün, gelb, gelb, 
gelb); 
wort = ARRAY (farbe) OF 
string (6) 
= (‚rot‘, ‚orange‘, ‚gelb‘, 
‚grün‘); 

An diesem Beispiel ist auch zu 
erkennen, daß der Typ STRING in 
Turbo implementiert ist. Zahlreiche 
Funktionen unterstützen dabei die 
Arbeit mit diesem Typ. Auch Re- 
cords mit Variantenteil und dyna- 


SERVICE 


mische Datenstrukturen sind in 
Turbo gut zu beherrschen. 

Die Kompatibilität der Daten- 
typen erleichtert die Arbeit unter 
Turbo Pascal. So ist es durchaus 
nicht selbstverständlich, daß ein 
String der Länge eins und eine Zei- 
chenvariable einander zuweisbar 
sind, oder daß eine Variable aus 
dem Bereich 0..255 (für den Turbo 
das reservierte Wort BYTE kennt) 
einer INTEGER-Variablen zugewie- 
sen werden kann. 

Wer im System selbst arbeiten 
will, wird die INLINE-Prozedur 
(direkte Speicherbelegung) sowie 
die verschiedenen Kommunikations- 
möglichkeiten mit dem Betriebs- 
system schätzen lernen. Sogar auf 
die I/0-Ports der Z 80 CPU kann 
zugegriffen werden. Dateien kön- 
nen nicht nur durch READ und 
WRITE, sondern auch durch low- 
level-Prozeduren bearbeiter werden, 
die Ihnen jedes Byte offenlegen. So 


FEHLER IN DER 


ist Turbo Pascal ein nach allen Sei- 
ten offenes System. 

Die anfängliche Einschätzung 
dieser Programmiersprache hat sich 
nach einem gründlichen Test also — 
gottlob — als falsch erwiesen. Tur- 
bo Pascal hat ohne Zweifel das Prä- 
dikat „sehr empfehlenswert“ ver- 
dient. Und um allen Noch-Nicht- 
Pascal-Freaks einen Vorgeschmack 
zu geben, sei zum Schluß das oben 
angeführte Beispiel fortgesetzt: 

VAR 

1: INTEGER: 
BEGIN 
REPEAT 
FORi:=1TO15 DO 
BEGIN 
WRITELN (, Die Ampel 
ist‘, wort [ampelphase]i]]); 


DELAY (1000) 
END 
UNTIL FALSE 
END. 
(Alwin Ertl) 


TURBO-GRAPHIK 


Im Grafikhandbuch zur CPC-Ver- 
sion von Turbo Pascal hat sich ein 
böser Fehler eingeschlichen. Bei der 
Erklärung der Prozedur „pattern“ 
heißt es dort auf Seite 25: 
„Das Muster ist eine 8x8-Matrix, 
die durch den Eingabeparameter 
‚pmuster‘ definiert wird. Dieser 
ist vom Ty 
array (.0..7.) of byte 


Wie sich durch Lektüre des Quell- 
textes der Grafikroutinen ergab, ist 
diese Aussage falsch. Richtig müßte 
sie lauten: 

„Das Muster ist eine 8x8-Matrix, 

die durch einen Eingabeparame- 

ter vom Typ ‚pmuster‘ definiert 
wird. Dieser hat die Struktur 

Ebenso ist das auf derselben Sei- 
te vorgestellte Beispiel in Turbo 
überhaupt nicht lauffähig. Es müßte 
lauten: 

Lines : pmuster = (844, 888, $11, 

322, 544, 388, 311, 322) 

Zur Verdeutlichung: Der Typ 
„pmuster‘“ wird in den Grafikrou- 
tinen zu Turbo Pascal als ARRAY 
(.0..7.) OF BYTE definiert. Jeder 
vom Benutzer derart definierte Typ 
anderen Namens oder die direkte 
Angabe der Struktur (wie in dem 
Beispiel) wird nicht als Parameter 
zu „pattern“ akzeptiert. 
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Obwohl man dem Grafik-Hand- 
buch ansieht, daß es in aller Eile 
zusammengestellt wurde, möchte 
man den Herstellern doch raten, 
demnächst ihre eigenen Beispiele 
wenigstens zu testen. Dann hätte 
dieser auffällige Fehler nämlich 
ohne Weiteres vermieden werden 
können. Gerade bei einem anson- 
sten weitgehend ausgereiften Sy- 
stem sind solche Schwachstellen in 
der Dokumentation ein unnötiges 
Ärgernis. 

(Alwin Ertl) 


Dazu ein Nachtrag: Als Zeit- 
schrift, die mit den Erfahrungen 
von Lesern anderen Lesern helfen 
will, fühlt sich Schneider-aktiv ver- 

flichtet, auf solche Schwachstel- 
en hinzuweisen. Sollten Sie also ein 
gängiges Software-Produkt für einen 
chneider-Computer besitzen und 
dort Fehler in der Dokumentation 
und/oder Benutzerführung festge- 
stellt haben, so teilen Sie uns diese 
bitte mit. Wenn Sie außerdem einen 
Verbesserungsvorschlag haben, so 
fassen Sie doch Ihre Erkenntnisse 
in einem kleinen Artikel zusammen. 
Dadurch profitieren nicht nur Sie 
von Ihren Erkenntnissen, sondern 
auch andere. Und das übliche Ho- 
norar ist Ihnen ebenfalls sicher! 


I 


TEST 


Dieses Nachfolgespiel von Hacker ist zwar schon seit einiger Zeit auf dem 
Markt. Aber Schneider aktiv bringt den Bericht über dieses Spiel dafür um 
so ausführlicher. Es muß ja nicht immer nur das Neueste sein und gute 
Spiele für den CPC sind ja sowieso zeitlos. 


Und gut ist dieses Spiel schon, 
denn abgesehen von einer ideen- 
reichen Story weist dieses Spiel 
en eine ausgezeichnete Grafik 
auf. 


Auftrag per DFÜ: Eingreifen ins 
Ost/West-Poker 


Während Sie als Hacker versuchen, 
in eine Mailbox einzudringen — ob- 
wohl man so etwas nicht tut — um 
dort Ihr Unwesen zu treiben, wird 
die Übertragung plötzlich unter- 
brochen. Mit Ihren Versuchen ha- 
ben Sie Ihre besonderen Fähigkei- 
ten unter Beweis gestellt und genau 
diese werden dringend benötigt. 

Auf Ihrem Monitor erscheint ein 
Hilferuf der amerikanischen Regie- 
rung, die Sie bittet, Ihr ganzes Hak- 
ker-Wissen zur Rettung der west- 
lichen Welt einzusetzen. Nach der 
en Überraschung geht es dann 

os. 

Die russische Regierung will, wie 
soll es auch anders sein, die Verant- 
wortlichen im Weißen Haus in Was- 
hington stürzen. Die Russen haben 
dazu unter strenger Geheimhaltung 
einen Plan gefaßt, den sie schriftlich 
festgehalten haben. 

Die einzigen Kopien dieses Planes 
befinden sich in einem streng ge- 
sicherten Geheimstützpunkt in Sibi- 
rien, im Gefrierschrank der russi- 
schen Nation. Wenn der CIA eine 
Kopie der Papiere in seinem Besitz 
hätte, könnte er verhindern, daß 
dieser teuflische Plan Erfolg hätte, 
oder könnte es zumindest versu- 
chen. 

Den amerikanischen Top-Agen- 
ten ist es in einer Geheimaktion 
nun gelungen, drei neuentwickelte 
Fernsteuereinheiten, sogenannte 
MRU’s (Mobile Remonte Units: Be- 
wegliche Ferneinheiten) in den rus- 
sischen Geheimstützpunkt einzu- 
schleusen. Sie können diese MRU’s 
kontrollieren und müssen versuchen, 
aus einem Tresor eine dieser Kopien 
zu stehlen und damit die westliche 


Welt vor dem sicheren Untergang 
bewahren. 

Um den Panzerschrank zu öff- 
nen, benötigen Sie das richtige Paß- 
wort. Teile dieses Codes werden 
sinnigerweise in vier verschiedenen 
Aktenschränken aufbewahrt. Sie 
müssen die drei MRU’s in dem geg- 
nerischen Militärkomplex so fern- 
steuern, daß Sie sich die vier Code- 
teile besorgen können, um damit 
den Panzerschrank öffnen zu kön- 
nen. Einer der Aktenschränke läßt 
sich mit dem Code „RED 7“ öff- 
nen, die anderen Codes zum „Knak- 
ken“ der Aktenschränke müssen Sie 
selbst herausfinden. Aber mit Ihrem 
Hacker-Instinkt und viel Glück wird 
es schon klappen. 

Während Sie die MRU’s durch 
den russischen Militärkomplex fern- 
steuern, müssen Sie natürlich damit 
rechnen, daß auch die Sowjets ihre 
Station streng bewachen. Sobald 
Ihre MRU’s entdeckt werden, tritt 
die gegnerische Abwehr auf den 
Plan und will Ihre Fernsteuerein- 
heiten vernichten. Also, geben Sie 
acht auf die Abwehragenten. 


Das Spiel: Videoüberwachung und 
Fernlenkung 


Nach dem Laden fragt der CPC 


nach einem Code. Wissen Sie ihn, 
so wird sofort das eigentliche Spiel 
gestartet. Da es keine große Hilfe 
darstellt, sei die Zahlenkombination 
hier verraten: „00987“. Sollten Sie 
diese Ziffern nicht richtig eingeben, 
sondern andere, läuft erst die Vor- 
geschichte ab, die Sie aber nicht 
überspringen sollten, denn sie ist 
ganz nett anzusehen. Innerhalb die- 
ser Vorgeschichte müssen Sie sich 
einem Test unterziehen, ob Sie über- 
haupt geeignet sind, die MRU’s zu 
kontrollieren. Um die MRU’s fern- 
zusteuern, steht Ihnen ein neuent- 
wickeltes Steuergerät zur Verfügung. 
Dieses Kontrollgerät heißt Multi- 
Funktions-Schalt-Matrix, kurz 
MFSM. 
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EIME MI.TIFUNHT: 
cHFSHM> WURDE TM 
um SIE NOR EWTDi 
MACHEN SIE SICH 
MFSM VERTRAUT. | 

" DEN BLOCHDE 


SBETURM?T 


Kontrolle über 
4 Kameras mit 


Videorecorder 
TONS-BCHALT-HATRIL% 
EBMNEUDE MERBTECHKT . 
MG ZU SCHUETZEM. 
' DEH Aürsnau ber 
EM BEE DEE TEILE 
RAMM ZDEMTIFLIZLIEREm. 
Vorbereitung 
mit Gebäude- 
plan 
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Innerhalb dieses Testes sollen Sie 
dieses MFSM genauer kennenlernen. 
Dazu sind die Ein- und Ausgänge zu 
definieren. 

Dieses MFSM-Gerät ist schon ein 
fantastisches Gerät. Über Tausende 
von Kilometern ist Ihr CPC über die 
CIA-Zentrale und mittels mehrerer 
im Orbit kreisender Satelliten mit 
diesem Fernsteuerkontrollgerät ver- 
bunden. Und damit haben Sie dann 
direkten Kontakt mit den MRU’s, 
die Sie im fernen Sibirien kontrol- 
lieren. Es ist also sehr wichtig, sich 
mit dem MFSM-Gerät zu befassen. 


Ihre Waffen: Der Verstand und 
das MFSM-Gerät 


Die Zentraleinheit des MFSM be- 
steht aus vier Monitoren und den 
dazugehörigen Kontrollelementen. 
Diese Kontrollelemente wählen Sie 
mit dem Joystick an. Durch Drük- 
ken des Feuerknopfes „klicken“ Sie 
dann den jeweiligen Schalter an und 
haben damit Ihre Wahl bestätigt. 

Zu diesen Kontrollelementen ge- 
hört die „SELECT“-Taste. Mit Hil- 
fe dieser Taste können Sie sich ei- 
nen der vier Monitore auswählen. 
Nach der Auswahl besteht nun die 
Möglichkeit, auf den jeweiligen Mo- 
nitor eines der Eingabegeräte zu 
schalten. Zu den Eingabegeräten ge- 
hören Live-Kameras, die Ihnen ver- 
schiedene Bildausschnitte der zu 
überwachenden Gebiete zeigen kön- 
nen sowie Videorecorder. Sie haben 
damit die Möglichkeit, aus 38 ver- 
schiedenen Überwachungsbildern 
die für Sie in Augenblick wichtigen 
Bilder einzublenden. Durch Anklık- 
ken der Plus-/Minus-Tasten treffen 
Sie die Auswahl aus diesen 38 Ka- 
nälen. 

Haben Sie dann einen Bildschirm 
ausgewählt, so muß dann, wie bei 
einem Monitor üblich, eventuell der 
Bildfang nachgeregelt werden. Da- 
zu klicken Sie die V-HOLD-Taste 
an und regeln dann den Bildfang 
mit Hilfe dieser Taste solange nach, 
bis der Bildfang richtig arbeitet und 
Sie ein normales Bild auf dem je- 
weiligen Monitor sehen. 

Ist der Bildfang in Ordnung, se- 
hen Sie auf dem angewählten Bild- 
schirm einen Ausschnitt des Militär- 


Bitte lesen Sie weiter auf Seite 94 
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GRAFIKBUCH 


Dieses Buch erhebt, laut 
Vorwort der Verfasser, 
den Anspruch, ein Stan- 
dardwerk in Sachen 
Schneider-CPC-Grafik 
zu sein. Wenn man die 
knapp 600 Seiten 
durchliest und Schritt 
für Schritt durcharbei- 
tet, stellt man doch 
auch einige Lücken fest. 
So werden in der ersten 
Hälfte des Buches zwar 
ausführlich die draw-, 
plot- und move-Befehle 
erläutert, jedoch die 
drawr-, plotr- und 
mover-Befehle sucht 
man dort vergebens. Die 
werden erst ganz hinten 
im Anhang kurz er- 
wähnt. Wenn schon, ge- 
rade in den ersten Kapi- 
teln, so großer Wert auf 
einen langsamen, aber 
vollständigen Einstieg in 
die CPC-Grafik-Befehle 
und Grafik-Möglichkei- 
ten gelegt wird, so hät- 
ten diese Befehle auch . 
dort erläutert gehört. 
Doch nun zum Inhalt. 
In den ersten Kapiteln 
wird der aufmerksame 
Leser langsam, ganz lang- 
sam, an die Grafikfähig- 
keit der CPC’s herange- 
führt. Viele Beispiele 
und viele Demo-Listings 
erläutern die in den je- 
weiligen Kapiteln behan- 
delten Themen. Da 
kommt auch ein Anfän- 
ger mit. 
Begonnen wird mit dem 
Zeichnen der ersten 
Punkte, Striche und geo- 
metrischen Formen. Der 
Zeichensatz und der Um- 
sang mit ihm wird aus- 
ührlich dargestellt. Be- 
sonderer Wert wurde von 
den Autoren auch auf 


die Darstellung von mathe- 


matischen Funktionen 
und Diagrammen gelegt. 
Wer da noch lernen will, 
hier kann er es. 

Ein besonderes Kapitel 
widmet 'sich den Darstel- 
lungsmöglichkeiten der 
3-D-Vektorgrafik. Der 


Unterschied zwischen der 


Parallel- und der Zentral- 


projektion in der Vektor- 


grafik wird ausführlich 
und auch für Anfänger 


TEST 


durchaus verständlich 
dargestellt. Aber nicht 
nur für Anfänger ist das 
Buch brauchbar, auch _ 
Freaks können durchaus 
noch vieles lernen, oder 
besser als bisher begrei- 
fen. Dies gilt besonders 
für die beiden letzten 
Kapitel, die sich mit der 
CPC-Maschinenprogram- 
mierung und mit der 
GSX-Systemerweiterung 
befassen. Da schlägt 


auch das Herz der ‚alten 
Hasen“ höher. Aber auch 
für die Bastler ist etwas 
dabei: Ein „Lightpen“ 
zum Selberbauen. Alles 
in allem: Wer Neuling ist 
und in die Grafik beim 
„Schneider“ einsteigen 
und nicht nur bei den 
Anfängen stehen bleiben 
will, der sollte sich dieses 
Buch kaufen oder schen- 
ken lassen. Den CPC’lern, 
die sich schon in Basic 
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auskennen und sich auch 
schon mal etwas mit 

der Grafikfähigkeit ih- 
res Computers beschäf- 
tigt haben, kann ich ei- 
gentlich nur empfehlen, 
zumindest die ersten Sei- 
ten im ‚„Eilschritt‘““ zu 
lesen. Für die wird es ei- 
gentlich erst so in der 
Mitte des Buches inter- 
essant. 


(Manfred Eibisch) 


DATENSCHUTZ? 


Viel war in den letzten 
Monaten über den Daten- 
schutz zu lesen. Vor al- 
lem wegen der Volkszäh- 
lung. Scharen von Daten- 
schutzbe- und -nichtbe- 
auftragten dachten mehr 
oder weniger intensiv über 
alle möglichen Sicher- 
heitsmaßnahmen nach, 
um Daten nicht in falsche 
Hände geraten zu lassen. 
Das Ergebnis dieser Be- 
mühungen? Mag jeder 
selbst beurteilen, wie es 
darum steht. Mir geht es 
aber auch um ein Daten- 
schutzproblem, denn ich 
habe mir in den letzten 
Wochen auch so meine 
Gedanken gemacht und 
zwar vor allem deshalb, 
weil ich gar nicht mehr 
so sicher bin, ob ich nicht 
bereits schon einmal Da- 
ten weitergegeben habe 
oder,noch viel schlimmer, 
in der Zukunft sogar viel- 
leicht wissentlich weiter- 
gebe, ohne es eigentlich 
zu wollen! 

Haben Sie sich schon ein- 
mal darüber Gedanken 
gemacht, wie leicht Da- 
ten versehentlich weiter- 
gegeben werden können? 
Hierzu gibt es sowohl 

mit Disketten als auch 
mit Harddisks Möglichkei- 
ten, an die der ‚Compu- 
ternormalverbraucher“ 

in erster Linie gar nicht 
denkt. 


1. Unwissentliche Weiter- 
abe von Daten und 
rogrammen über eigene 

Disketten 


Diskettenfiles werden 
durch normale Löschbe- 
fehle nicht wirklich ge- 
löscht, sondern es wird 
nur der Dateinamenein- 
trag und die durch das 
File belegten Sektoren 
wieder freigegeben. Mit- 
tels direkter Zugriffe 
können diese Daten aber 
gelesen werden und es 
gibt auch die Möglichkeit, 
gelöschte Files wieder als 
gültig zu deklarieren. So- 
lange nach einem Lösch- 
befehl, der ja eigentlich 
keiner ist, noch nicht 
wieder auf eine Diskette 
geschrieben-wurde, sind 


MEINUNG 


Programm- oder Daten- 
files leicht wieder zurück- 
zuholen. Der Empfänger 
ihrer Disketten (wenn 

Sie solche weitergeben) 
kommt also, wenn Sie das 
nicht bedacht haben, ohne 
eigenes Zutun in den Be- 
sitz von Daten, die Sie 
ihm eigentlich gar nicht 
geben wollten, sonst hät- 
ten Sie das File wahr- 
scheinlich gar nicht ge- 
löscht. Bedenken Sie dies, 
wenn Sie Disketten wei- 
tergeben.. 


2. Datenweitergabe über 
Demo-Disketten 


Es ist erst ein paar Mona- 
te her, da ‚„flatterten“ 
mir durch eine Computer- 
zeitschrift Demonstra- 
tionsprogramme auf Dis- 
ketten ins Haus. Neugie- 
rig wie ich bin, wollte ich 
natürlich wissen, wer mir 
zwei Disketten geschenkt 
hatte und was mir sonst 
noch geboten würde. 
Interessant an diesen 
Demoprogrammen war 
die Aufforderung, diese 
Disketten zurückzuschik- 
ken, damit diese dann 
(kostenlos) gegen ein Pro- 
gramm im Wert von 
298,— DM ausgetauscht 
werden könnten. Eigent- 
lich ist es aber doch gar 
nicht so normal, daß eine 
Firma freiwillig soviel 
Geld verschenkt, damit 
jeder PC-Besitzer, der 
eine bestimmte Zeitschrift 
abonniert hat, so ein 
„Soundsoviel-DM-Ding“ 
bekommt. Andererseits 
werden aber Millionenbe- 
träge in die Werbung ge- 
steckt! 

Nun ja, was soll’s, warum 
sollte ich diese Disketten 
nicht zurückschicken und 
dafür so ein Supergeschenk 
erhalten? Im Nachhinein 
kommen mir nun aber 
doch Bedenken. Nicht 
daß ich dieser Firma nun 
etwas unterstellen möchte, 
aber die Möglichkeit 

hätte ja bestehen kön- 
nen, daß mit diesen Dis- 
ketten bei mir Daten 
„abgeholt“ hätten werden 
können. Im einfachsten 


Falle Daten über meine 
Rechnerkonfiguration. 
Durchaus denkbar wäre 
auch, daß ein Demonstra- 
tionsprogramm während 
des Laufes sich plötzlich 
— so ganz nebenbei — von 
meiner seit einiger Zeit in- 
stallierten Harddisc Da- 
ten oder Programme 
„stiehlt“. Ja es wäre z.B. 
auch möglich, ROM-Routi- 
nen und Steckkarten- 
Betriebssysteme auf die 
Demodiskette zu über- 
tragen. Dabei brauchen 
bei einer Massenversen- 
dung nicht einmal alle 
Demo-Disketten präpa- 
riert zu sein, einige we- 
nige genügen unter Um- 
ständen, damit fremdes 
Know-how ‚auf Reisen 
geht“. Was ich als Vor- 
sichtsmaßnahme empfeh- 
le, wollen Sie wissen? 
Nun, kleben Sie bei De- 
monstrationsdisketten 
erst einmal den Schreib- 
schutz, bevor Sie sie ins 
Laufwerk legen und for- 
matieren Sie sie neu, be- 
vor Sie sie wieder an den 
Absender zurückschik- 
ken, dann haben Sie zu- 
mindest eine gewisse 
Sicherheit gegenüber 
„Datenklau-Disketten“. 


3. Datentransfer durch 
defekte Harddisc 


Dieser Punkt ist meines 
Wissens überhaupt noch 
nicht in dieser Tragweite 
— wie ich sie nun schrei- 
be — veröffentlicht wor- 
den. Eine Harddisc ist ja 
ein fantastischer Massen- 
speicher, aber sehr teuer, 
und deswegen wird man 
sie kaum wegwerfen, 
wenn sie defekt gewor- 
den ist. Bei schadhaften 
Disketten fackele ich 
meist nicht lange! Aber 
bei einer Harddisk? 
Warum ich mir eigentlich 
Gedanken darüber ma- 
che? Nun, auf meiner 
Platte sind Daten, die ich 
ungern an andere weiter- 
geben will. Zum Beispiel 
mein nächstes Buch, pri- 
vate Daten verschiedener 
Art, fertige und halbfer- 
tige Artikel, usw. Ange- 
nommen, meine Hard- 
disc bzw. Drivecard, ver- 
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weigert plötzlich ihren 
Dienst, weil ein elektro- 
nischer Defekt im Con- 
troller aufgetreten ist. 
Nun wäre ich ja gezwun- 
gen, mein Massenspei- 
chermedium zur Repa- 
ratur zu geben. Die Ser- 
vicestelle würde nun den 
elektrischen Fehler be- 
heben und... . schon stän- 
den einem Fremden mei- 
ne Daten zur Verfügung. 
Nun, meine Daten sind 
nichts Weltbewegendes, 
aber plötzlich käme viel- 
leicht ein Programmbei- 
spiel schon in Umlauf, 
bevor ich es überhaupt 
veröffentlicht habe. 
Mache ich mich vielleicht 
sogar strafbar wegen der 
Reparatur? Das DOS und 
auch andere Programme, 
die ich zwar für viel Geld 
gekauft habe, oder zumin- 
dest wegen des von mir 
erstatteten Betrages be- 
nutzen darf, und die sich 
ja auf der Harddisc be- 
finden, schicke ich plötz- 
lich in Deutschland 
durch die Gegend! 

Aber eigentlich bin ich 
vielleicht noch gar nicht 
so schlimm dran wie ei- 
ner der so geschmähten 
Raubkopierer, der seine 
Harddisc von einer Firma 
bezog, die nicht nur Hard- 
ware anbietet und repa- 
riert, sondern auch Soft- 
ware verkauft. Vielleicht 
muß dieser einmal seine 
nicht mehr funktionie- 
rende Harddisc zur Repa- 
ratur einsenden und bei 
der Reparatur stellt die 
Firma vielleicht fest, 
daß sich auf der Diskette 
eines ihrer Programme be- 
findet, Ohne daß es an 
den Reparatureinsender 
verkauft wurde. Kennen 
Sie die Folgen? Ich 

auch nicht! 

Vielleicht steigt demnächst 
ja der Umsatz von Vor- 
schlaghämmern, die ein- 
zig und alleine dem 
Zwecke dienen sollen, 
Harddiscs zu zertrüm- 
mern? 

Sie sehen, Datenschutz ist 
ein Thema, das nicht 
oberflächlich abgetan 
werden kann. Ein paar 
Gedanken sollte man sich 
schon auch darüber ma- 
chen. LM 


SERIE 


En ekha 
die eine einstimmige Melo- In unser Programm soll 
e Ä so PFT- die bis zu 10 Tönen spie- noch eine Konstante 
len kann. Da Pascal keine „Zeitfaktor“ eingebaut 
Datenlisten zuläßt, kön- werden, durch die sich 
nen so einfacher Melo- das Tempo der Melodie 
dien erzeugt werden, als regulieren läßt. Die play- 


durch eine Abfolge von Prozedur dürfte nun 
Pascal ist einer der schönsten Programmiersprachen, SOUND-Anweisungen. leicht verständlich sein. 
die es gibt. Leicht verständlich, in der Programm- En ehet aber no wir Inder ersten nt 
n . = . uns wiederum auf eine zweigung wird die zu je- 
ausführung schneller als Basic und — wenn man groß Notation einigen. dem Ton gehörige Fre- 


zügig ist — an einen Standard angelehnt. Inzwischen Ein Ton umfaßt drei wich- quenzperiode in der 


hat die Sprache viele Freunde JEWORNEN und tige Informationen: Zum Grundoktave gesucht. Da- 
Schneider aktiv trug dem mit einem, mittlerweile ersten, welcher Ton in nach wird aus dem zwei- 


abgeschlossenen, Pascalkurs Rechnung. Damals legten der Tonleiter denn gemeint ten Zeichen die Oktave 
wir einen der ersten Interpreter für den CPC zugrunde, sei; dann, in welcher Ok- ermittelt und die Fre- 


das HiSoft-Programm. Es zeigten sich allerdings tave er gespielt werden. quenz entsprechend oft 
auch schnell die Nachteile, die das Produkt des eng- soll; und schließlich, wie verdoppelt bzw. halbiert. 
lischen Softwarehauses aufzubieten hatte. Da man lange er erklingen soll. Hierauf folgt erneut ein 


mit einigen Kniffen aber die Hürden umgehen oder Die Tonleiter ist dabei CASE-Befehl, der die 
beseitigen kann, bringen wir nun als Nachtrag noch ein Re u ee en ee u Es NOchwent 
paar diverse Hilfen. Wie die Titelzeile verrät, geht FACH SOEBESIELS, WEN, SIEBIELEIE IRTANSERNES 


wir für die Halbtöne ßende IF addiert dazu 
es heute um den Sound am CPC. Kleinbuchstaben benut- noch einmal die Hälfte, 
en: i i 

HiSoft bietet die Möglich- ren getrennt einspeichern ? NS handelt. 
keit, die Firmware-Rou- und mit der $F-Option _ C-c-D-c-E-F-f-G-g-A-a-H Um zu akzeptablen Zei- 
nen es en a nut Rn u osenim. Sr Bei den Oktaven halten ten für Sound zu kommen, 
st ie wie Sie diese Rou- ramm sähe dies = aus: Pr un: an.das Basie Hand nu 
RER ie di : 8 ° buch zum CPC; für die plikation mit dem oben 
a s ist Yy ver Se p 180,180,music.con ngeativen Werte kann erwähnten Zeitfaktor. 
ne sone p 210,220,music.typ man ja die Zeichen be- Dabei wird der Zeitverlust 
an ed ee es p 270,900, music.prc nutzen,deren ASCII-Wer- auch in den benötigten 
soll all denjenigen unter Das Einbinden liefe wie KL unge outer en 


: r i Null liegen. Dmiterha- ———_—_—— 
Ihnen ein wenig unter — PROGRAMM ten wir, vom tiefsten FIRMWARE-ROUTINEN 


den, die gerade erst mit meinprogramm; en ROchaten Wenn kein Sternchen an- 
der Pascal-Programmie- j i getroffen wurde, wird der 
rung begonnen haben ($F music .con) —--.-/-0-1-2- Ton anschließend gespielt. 
und sicher die eine oder TYPE . 3-4 Nach einiger Zeit dürften 
andere nützliche Routine ($F music .typ) Zur Verdeutlichung: Sie sich an die im Grunde 
entdecken werden. ($F music .prc) Die Sonderzeichen sind ee non 
————  —— —  — Wennin den Programmen Minus, Punkt und Schräg- tion für die Töne gewöhnt 
DIE NOTATION ee 8° haben. Sicherlich verspü- 


REGELUNG IN PASCAL wendet werden, soistim _Notenwerte sind zugelas-- ren Sie dann keine Lust 
7777 USER-Befehl die Adres- sen von Zweiunddreißig-, mehr, bei einzelnen Tö- 


Die Programme, die Sie in se für den CPC 464 stel bis zu Ganzen, jeweils nen noch mit der umständ- 
Zukunft hier vorfinden angegeben. Eine Kom- durch den Anfangsbuch- lichen SOUND-Prozedur 
werden, verwenden eine mentarklammer dahinter staben gekennzeichnet. zu arbeiten. Unsere play- 
einheitliche Notation, enthält die vollständige Für punktierte Noten soll- Routine soll daher durch 
die Sie kennen sollten. Bezeichnung der Routi- ten wieder Kleinbuchsta- eine Prozedur „note“ für 
Globale Variablen werden ne, so daß die Besitzer ben verwendet werden. einzelne Töne ergänzt 


für die vorgestellte Proze- anderer Schneider-Gerä- werden. Das ist jedoch 
duren unter der angege- te ohne Probleme aus 225s-Aa-Vv-Hh-G8 ‚weiter kein Problem, 
benen Bezeichnung benö- den entsprechenden Hand- Ein Cis in der zweiten Ok- denn der drei Zeichen 


tigt, sofern nicht ein büchern die benötigte tave, Länge eine Achtel- lange String muß ledig- 
Kommentar ‚‚(nur für Adresse ermitteln kön- note, würde also wie lich mit Sternchen aufge- 
Demo)“ dahinter ange- nen. folgt geschrieben werden: füllt und an play überge- 
geben ist. Das Hauptpro- er BEE. ben Verden — so einfach 
ramm dient nur als klei- ine Zeichenkette, die ist das! 
ne Demonstration; die ASCHE zehn Noten enthält, muß Nach dieser kleinen „Auf- 
Prozeduren sollen Sie DER NOTEN — nach unseren Vorüber- wärm-Runde“ geht es in 
auch in eigenen Program- legungen — dreißig Zei- der nächsten Ausgabe 
men verwenden. Dazu chen lang sein. Für den auch schon ans „‚Einge- 
können Sie die CONST-, Damit wäre zum Allgemei- Fall, daß weniger als zehn machte“. Dort wollen 
TYPE- und VAR-Dekla- nen genug gesagt. Heute Töne gespielt werden sol- wir versuchen, ob man 
rationen (falls vorhanden) : soll — gewissermaßen zum len, sei die Kombination nicht auch in Pascal ei- 
jeweils ohne die Einlei- „Aufwärmen“ — eine Pro- “***“ als Kennung für nen SYMBOL-Befehl reali- 
tung sowie die Prozedu- zedur geschrieben werden, „kein Ton“ reserviert. sieren kann. 
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LISTING 


TRANSFER 


Es ist immer das gleiche. Die Arbeit mit einem CP/M- 
Kopierprogramm, etwa CSAVE und CLOAD oder 
FILECOPY, ist dem einen oder anderen einfach zu 
umständlich. Wieviel praktischer — mag sich Holger 
Pellmann gedacht haben — wäre ein Programm, das 
die ganze Arbeit abnimmt. Gesagt — getan, und 
schon präsentierte er uns das nachstehende Listing 
und die Programmbeschreibung. Dabei ist von unserer 
Seite eigentlich nur zu bemerken, daß die Lauffähig- 
keit auf dem CPC 6128 natürlich nur dann gegeben ist, 
wenn mit diesen Geräten trotzdem ein Kassettenre- 
corder betrieben wird. 

Transfer ist ein leistungsfähiges Programm zum Kopie- 
ren von Kassetten auf Diskette und von Diskette auf 
Kassette. Es ist menügesteuert und deshalb einfach 
zu bedienen! Transfer läßt bei binären Daten eine 
Verschiebung des Programmstartes sowie die Ände- 
rung der Einsprungadresse zu. Da heutzutage der Ko- 
pierschutz etwas anders ausschaut, handelt es sich 
bei „Transfer“ also nicht um ein Raubkopierpro- 
gramm. Trotzdem soll darauf hingewiesen werden, 
daß das Urheberrecht auf jeden Fall beachtet wer- 
den muß. 

Allgemeines zum Programm: Transfer arbeitet mit 
Amsdos-Vektoren und unterdrückt die Fehlermel- 
dungen des Amsdos nicht! Natürlich reagiert Trans- 
fer auf diese Fehler und bricht nicht ab (wie etwa 
Basic), da alle Amsdos-Zugriffe über Maschinencode 
erfolgen. 

Das Programm meldet sich mit dem Menü Tape 

to Dis. Punkt 1 ist der wohl interessanteste, näm- 
lich das Kopieren von Kassette auf Diskette. 

Das Programm fordert Sie zum Einlegen der Original- 
kassette, einer Diskette und zum Druck einer Taste 
auf. Sobald Transfer den 1. Block einer Datei gefun- 
den hat, müssen Sie den Diskettennamen eingeben. 
Dieser Name wird vom Amsdos verarbeitet, er darf 
also auch die gewünschte Usernummer oder das 
gewünschte Laufwerk enthalten. Möchten Sie aber 
die Datei nicht kopieren, drücken Sie einfach die 
Enter-Taste. Bei eventuellen Leserfehlern während 
des Kopierens bricht das Programm den Kopier- 
vorgang einfach ab und sucht das nächste File. Diese 
Routine wird wie alle Programmteile mit zweimali- 
gem Druck auf die ESC-Taste beendet (beim zweiten 
Druck solange gedrückt halten, bis das Programm 
darauf reagiert!). 

Der 2. Menüpunkt erstellt von einer eingelegten Kas- 
sette ein Inhaltsverzeichnis besonderer Art. Trans- 
fer informiert nicht nur über Art und Länge der 
Files, sondern auch darüber, ob diese vollständig 

auf Kassette sind. Fehlen einige Blöcke oder sind die- 
se unleserlich, so warnt das Programm Sie und gibt 
die Nummern der fehlenden Blöcke an. Dieser Kas- 
settenkatalog, der ebenfalls mit ESC abgebrochen 
wird, kann auch auf einem Drucker ausgegeben wer- 
den. Findet Transfer beim Aufruf dieses Menüpunk- 
tes einen Drucker vor (ON LINE Stellung!), so kann 
man zwischen Bildschirm und Drucker wählen. 
Unter dem Menüpunkt ‚Blöcke ausgeben“ verbirgt 
sich eine dem Basicbefehl CAT ähnliche Funktion, 
nämlich das einfache Überprüfen einzelner Blöcke 
auf Lesbarkeit und Namen. Diese Funktion eignet 
sich zum Suchen bestimmter Programme. Mit ESC 
bricht man auch diese Routine ab. 


Punkt 4 des ersten Menüs gibt die Directory einer 
Diskette aus und bedarf keiner weiteren Erläute- 
rung. Findet Transfer einen Drucker vor (ON LINE 
Stellung!), wird die Directory auch auf dem Druk- 
ker ausgegeben. 

Punkt 5 des Menüs sorgt für den Aufbau des 2. Me- 
nüs Disc to Tape. Auch hier steht das Kopieren ei- 
nes Files an erster Stelle. Zuerst wählen Sie den Na- 
men, den diese Datei auf Kassette haben soll. Geben 
Sie hier nur ENTER ein, so wird es ein Unnamed 
File, geben Sie ein * ein, so wird der Diskettenna- 
me übernommen. Als nächstes können Sie die 
Baudrate zwischen 700 und 3600 Baud frei auswäh- 
len. An dieser Stelle möchte ich darauf hinweisen, 
daß der Recorder des CPC 464 nicht für CrO2 
Kassetten ausgelegt ist und Sie diese auf keinen 

Fall bei höheren Baudraten verwenden sollten 

(bei 3600 Baud können Sie nämlich sonst von 
Glück reden, wenn der Computer den Namen Ihrer 


UNSERE MAILBOX STEHT! 


Was lange währt: Unsere Mailbox steht! Unter der 
Rufnummer 089/183951 können nun alle DFÜ- 
Freaks unseren Computer anwählen. 


WICHTIGE HINWEISE! 


Die Box befindet sich noch im Probe-Betrieb — 
kleinere Fehler können noch auftreten, werden 
aber sofort ausgemerzt. Die Telefonnummer ist 
eine Direktleitung zum Computer, kann also nicht 
für normale Gespräche genutzt werden! 

Die Box ist menü-gesteuert, beachten Sie bitte die 
Bedienungshinweise! 

Die Box ist an Wochentagen zunächst nur von 

19 Uhr abends bis 9 Uhr morgens geöffnet, 
Samstags, Sonntags sowie an Feiertagen selbstver- 
ständlich durchgehend von 0 bis 24 Uhr. 


Datei noch erkennt!). Ihre Eingabe wird zur nächst- 
möglichen Baudrate gerundet. Das Kopieren von 
Diskette auf Kassette eignet sich vorzüglich zum 
Erstellen von Sicherheitskopien teurer Anwendungs- 
software. Sollte dem Original etwas zustoßen, kön- 
nen Sie die Kopie wieder auf Diskette zurück- 
kopieren. 
Punkt 2 des zweiten Menüs entspricht Punkt 4 des 
en Menüs und Punkt 3 geht zurück ins erste 

enü. 
Noch ein Hinweis zum Kopieren von Binärfiles: 
Transfer fragt Sie nach einer neuen Startadresse 
sowie einer neuen Einsprungadresse. Das ist not- 
wendig, weil einige Kassettenprogramme das Dis- 
ketten-RAM belegen. Wollen Sie die Adressen nicht 
verändern, drücken Sie nur ENTER. Beim Kopieren 
von geschützten Basicprogrammen (SAVE “ “,P) 
wird der Schutz beim Kopieren nicht mitkopiert!! 
Das ist ganz nützlich, da Kassettenprogramme zum 
Nachladen oft keinen Namen angeben und Sie sol- 
che Programme erst ändern müssen. Wird dieses Pro- 
gramm auf dem CPC 664 oder CPC 6128 eingesetzt 
und wird Ihr Recorder nicht vom Computer gesteu- 
ert, so muß beim Lesen von Kassette nach jedem 
Block kurz das Band gestoppt werden! 2 
Viel Spaß beim Ausprobieren! (Holger Pellmann) 
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LISTING 


FI BEE 2 7 5 2 2 2 2.2.2.2 2 2.2.2.0 0.2.2.0 0.4.0 0.2 2.3.2 2 2.2.2.2 2.7 


za’ TRANSFER * 
39 ’% VON * 
a’ HOLGEF. PELLMANN * 
s'%* FUER * 
69 ’% SCHNEIDER AKTIV * 
0 ’* CPC464/664/6128 * 
cl 2 5 2 2 0 2 2 22.2.4 2 2 2 2 0 2 2 2 2 2.0.2 2.2 22 7 22.2 2 2.202 


139 KEY DEF 66,1,9,9 

19€ ON ERROR G0T0 2479 

158 MEMORY 29999 

166 POKE &BE46, 15 

170 GOSUB 2020:60SUB 298 

188 POKE 49267, PEEK(&BBSB):POKE 49268,PE 
EK (RBBSCI:GOTO 289 

10@ ’%*%% BILDSCHIRMAUFBAU K#%* 

209 MODE 1:BORDER 13: PAPER 

218 INK @,0:1INK 1,26:1NK 2,6: INK 3,13 
229 CLS:PAPER 3:PEN 1:PRINT " TRANSFER 
4.1 $ 192? by H.Pellmann "$ 

230 WINDOW #2,27,39, 3,245 PAPER #2,2:PEN 
n2,1:CL$ 82 

239 WINDOW #1,2,25,3,133 PAPER #1,3:PEN # 
1,0:CL5 m 

258 WINDOW #9,2,25,139,245 PAPER #9,1: PEN 
R9,2:CL5 #8 

26 RETURN 


278 '%%#% MENUE TAPE TO DISC ##%* 


289 CLSH2:PRINT #2:PRINT #2,” TRANSFER 
PPPFPPPFP TAPE s DISC 
HAUPTMENUE 
298 PRINTR2:PRINT #2:PRINT #2,"1:File ko 
pie- ren 2:Files au 
f- listen 3:Bloecke 
ausgeben t car) 4:Directory 
ausgeben S:DISC s TAPE 


308 CLS HI:PRINT Mi 
318 PRINT #1," Name: ";PRINT #1:PRINT #1, 


" Blocknummer:":PRINT #1," Type ." 
PRINT #1," Start "PRINT #1," Lae 
ny3e "SPRINT #1," Einsprung 3" 


329 sprung=Q@:WHILE sprung=d OR sprung; 
w&=INKEYSSIF w$>”"." AND wsC>"&”" AND WEL 
>"+" THEN sprung=VAL (m$) 

33@ WEND:ON sprung GOTO 419,809,11692,123 
0,350 

346 ’#%#* MENDE DISC TO TAPE *#%* 

359 CLSSCLSHI:CLSHZ2EPRINT #2:PRINT #2," 


TRANSFER PPFFPFPP DISC s TAPE 
HAUPTMENUE 

360 PRINT #2:PRINT #2: PRINT #2,"1:File k 

opie- ren 2iDirecto 

ry ausgeben 3:TAPE s D 

1SC 


3?9 PRINTHLSPRINT #41,” Name: ":PRINT #L:P 
RINT #13 PRINT #1," Type "SPRINT # 
1," Start "SPRINT #1,” Laenge 
"SPRINT #1," Einsprung :*° 

339 sprungzd:WHILE sprungs® OR sprung?3: 


40 


ws=1INKEYS: IF n$C>*.® AND WSX2"Kk" AND WEL 
>"+" THEN sprung=VAL (n$) 
3°9 WEND:SON sprung GOTO 1349, 1249, 280 
ya °’ 
419 '%4% FILE VON KASSETTE KOPIEREN **%* 
420 ° 
439 CLS:PRINT !PRINT " FILES KOPIEREN 
":PRINTSPRINT " Bitte eine Diskette und 
die Originalkassette einlegen und ein 
e Taste druecken !"$SCALL &BBIB:!PRINT * 
OK.*® 
449 PRINT:PRINT" 
459 CLOSEOUT: 
969 anr=d:WHILE INKEY (66)<?9:60SUB 1839 
:LOCATE #1,3,19: PRINT #1,” 

":IF e=255 THEN LOCATE #1,3, 10: PR 
INT #1,"Achtung Lesefehler !" 
47% IF arr)?d THEN 399 
468 IF nr=1 AND e=d THEN GOSUB 579: G0OSUB 
669:60T0 5489 
498 60T 349 
50@ IF nr>i AND ans‘) n®$ THEN GOSUB 779: 
GOTO 349:’ File Abandom 
S19 IF E=255 THEN GOSUB 778:60T0 549 
328 IF nreanr+i AND ans=n$ THEN IF e=d 
THEN GOSUB 669 ELSE GOSUB 779:60T0 548 
53@ IF nr> anr+i THEN GOSUB 778 
549 WEND 
s59 IF anr>d THEN GOSUB 77% 
568 CLS:!GOTO 289 
578 ’%*%* FILE OPENOUT *%* 
588 PRINT * Bitte Diskettenname 
eben oder AENTERÜ: " 
598 PRINT * "5SLINE INPUT "",dnames 
688 IF dnanes="" THEN PRINT "File wird n 
icht kopiert. "RETURN 
618 IF LEN(dname$) >15 THEN PRINT "Falsch 
er Name” ;CHRS(?7):FOR Zei TO 599: NEXT:PRI 
NT SPACE$ (155) :60T0 579 
628 FOR a=i TO LENtdname$) :POKE 36999+a, 
(ASC(MIDS(dname$, a, 1) I) SNEXT:POKE 49979, 
LEN(dnane$) :POKE 39997,9:CALL 49978: 1F P 
EEK (39997)<C>9 THEN PRINT "Falscher Name*® 
:60T0 399 
639 FOR a=42912 TO 42926:POKE a-12P11,PE 
EK (a) :NEXT 
640 GSOSUB 2359 
659 GOSUB 1699: anrznr: an$=n$: RETURN 
669 ’%*%%* FILE WIRTING *%* 
679 IF ansC>n$ THEN RETURN ELSE POKE 399 
9? ,9:CALL AQLO9: IF PEEK(39997)=0 THEN 74 


Press AESCU to STOP” 


eing 


2 

688 FEHLER=SPEEK (39997): IF FHELER)L28 THE 
N FEHLER=FEHLER-128; 

679 CLS: PRINT * DISKETTENFEHLER !":PRINT 
:PRINT * Kopiervorgang beendet " 

708 IF FEHLER=L23 OR FEHLER=&24 THEN PRI 
NT * Diskette ist voll !" 

718 IF FEHLER=65 THEN PRINT * Diskette u 
nformatiert !* ELSE IF FEHLER=64 THEN PR 


-_ LISTING 


INT " Diskette geschuetzt !” 
728 POKE 39997,0:CALL 49127: ANR=Q 
739 RETURN 
798 IF LASTe® THEN ANR=NR:RETURN 
758 POKE 39997,@:CALL 49093: IF PEEK(3999 
7) <>@ THEN 689 
769 ANR=Q:PRINT " FILE kopiert !";PRINT 
" Bitte Taste druecken !":CALL KBBLB:RET 
URN 
778 IF anr=ed THEN RETURN ELSE PRINT " KO 
PIERVORGANG BEENDET ":60T0 728 
788 GOTO 288 
799 ' 
80% '#t% KASSETTEN KATALOG AUSGEBEN #%* 
81a ’ 
828 CALL 49946:1F PEEK(39998)=9 THEN str 
eam=0:60T0 888 
830 PRINT :PRINT * Ausgabe auf Drucker ? 
(J/m®5 

849 ins=INKEYS 
6590 IF ins="j" OR in$="J" THEN stream =8 
:G0T0 880 
869 IF ins$="n" OR ins$="N" THEN stream =9 
:G60T0 88% 
879 GOTO 8408 
888 PRINT " Ausgabe auf "j:IF stream «8 
THEN PRINT "Drucker" ELSE PRINT "Bildsch 
irm 
898 PRINT * Press AÄESCU to STOP"SPRINT 
‘PRINT "Press PLAY then any KEY":CALL &B 
B18 
988 PRINT " OK," 
918 anr=d:alnr=diWHILE INKEY (66) ()8:GOSU 
B 1839:L0CATE #1,3,10: PRINT N,” 

":IF e=255 THEN LOCATE #1,3 
‚„i@:PRINT #1,"Achtung Lesetfehler !" 
928 IF anr)d THEN 959 
938 IF nr=i AND e=d THEN GOSUR IQ IF I 
ast=255 THEN PRINT # stream „" File korr 
ekt." ;sanred 
949 GOTO 10108 
958 IF nr>i AND ans‘) n6 THEN PRINT # st 
ream ‚„"Achtung !";PRINT # stream ‚"File 
unvollstaendig !":PRINT " 
"sanr=ed:60T0 1019 
968 IF nr=i THEN PRINT # stream „"Filen 
icht korrekt.":G0SUB 1949:G0T0 1910 
978 IF nr=anr+i THEN IF e=d THEN anr=nr 
ELSE ble=255:60T0 1919 
989 IF nr> anr+i THEN :PRINT # stream ,„" 
Achtung !":PRINT # stream „"File unvolls 
taendig !"SPRINT * 
"SPRINT # stream ‚„"Block"janr+1$"- Block 
"3 nr-15"fehlt !'ıble=23S;anrenr 
99% IF anrenr AND last=255 AND ble=d THE 
N PRINT # stream ‚„" File korrekt."!anr=d 
10988 IF anrenr AND last=255 AND ble=255 
THEN PRINT # stream „“ File nicht korrek 
t.*"sarır=d 
1919 WEND 
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1928 PRINT " Ende";IF stream 
=8 THEN PRINT #8," E 
nde des Katalogs !" 

1938 FOR a=1 TO 2509: NEXT:CLS:GOTO 289 
1948 ’%%* AUSGABE BLOCK 1 ** 

1850 anr=ß:IF e=255 THEN RETURN 

1969 IF stream =8 THEN 1119 

19878 CLS:PRINT SPRINT " NAME: "in$ 

188% IF t=9 THEN PRINT " Basic *” ELSE I 
F t=2 THEN PRINT * Binaer *" ELSE PRINT 
"Ascii " 

1998 ansens:anreiible=fi 

1128 RETURN 

1119 PRINT 48, "FILE : "In65” 5 Types"s:l 
F t=8 THEN PRINT #8," Basic " ELSE IF 
t=2 THEN PRINT #8," Binaer ” ELSE FRINT 
#8," Ascil e 

1128 PRINT #8, "START :"jst}"j LAENGE :” 
gl; "ey H1HINTC1/2948) +11/2098=1NT(1/2948 
Y)3"Bloecke $| EINSPRUNG : "jex 

1139 ans=zn$;anrelible=d 

114% RETURN 

1159 * 

1160 ’%%%# CAT AUF KASSETTE #%*% 

1178 ' 

1188 CLS:PRINTSPRINT * Tape CAT': 
PRINT:PRINT "Press PLAY tnen any KEY":SCA 

LL &BBi18 

119% PRINT :PRINT *" Press “AESCU to STOP 
” 


1288 WHILE INKEY (66) <> © :GOSUB 1830: L 
OCATE #1,3,180: PRINT Wi,” 

":IF e=255 THEN LOCATE #1,3,19:PRIN 
T #1, "Achtung Lesetehler !" 
1218 WEND 
1228 PRINT :PRINT * Tape CAT break": F 
OR a=ı TO 2590: NEXT:CLS:G0TO 289 
1238 GOSUB 1259:G60T0 28% 
1248 GOSUB 1259:60T0 359 
1258 ° 
1268 '%%% DIREKTORY AUSGEBEN *#%* 
1270 ’ 
1288 JI=PEEK(KBBSB) : J2=PEEK (KBBSC) :POKE 
379099,65:POKE 39997,9:POKE 49979, 1: CALL 
49978:CLOSEOUT:IF PEEK (39997) THEN CL 
S: RETURN 
1299 CALL 40946: IF PEEK(39998)=8 THEN 69 
TO 1328 ELSE PRINT :PRINT " Ausgabe auf 
Drucker ? (J/ND "Sins=""sWHILE insty"J" 
AND ins‘) "N®t in$=UPPERSINKEY$):WEND 
1308 IF ins="N" THEN 1329 
1318 POKE &BBSA,&C3:POKE KBBSB,&45: FOKE 
&BBSC,K9D 
1328 MODE 2:PEN L:PAPER B:WINDOW 2,79,2, 
24:CALL 40968:POKE &BBSA,207:POKE &BBSB, 
Jt:POKE KBBSC,JI2S PRINT "BITTE IRGENDEINE 
TASTE DRUECKEN !"SCALL &EBLBIGCSUR 289: 
RETURN 
1339 ' 
1349 ’#%% DISCFILE KOPIEREN *%% 


LISTING 


1359 °’ 

136% CLEAR 

1379 FOR i=30900 TO 30190:POKE 1,9:NEXT 
1388 CLS:PRINT SPRINT " Bitte Namen des 
Files eingeben :":PRINT 

1399 PRINT " "ISLINE INPUT "",dnames$ 
14928 IF dnames="" THEN CLS:60T0 359 

1918 IF LEN (dnames))15 THEN PRINT "Fal 
scher Name"sCHRS(7):FOR Zei TO 399: NEXT: 
PRINT * 


":G0T0 1399 

1428 FOR asi TO LEN(dnames):POKE 36999+a 
‚(ASC(MIDS(dnames,a,1))):NEXT:POKE 49144 
‚LENtdname$):POKE 39997,8: PRINT * "35CAL 
L 498143: 1F PEEK(39997)C)8 THEN PRINT:PRI 
NT ® Fehler !’:PRINT CHRE(7):SFOR j= 
1 TO 13599: NEXT:CLS:!GOTO 339 

1438 ’ BUFFER ANLEGEN 

1449 tileheader=PEEK (39995) +PEEK (3996) * 
236 

195% b=PEEK(fileheader+18):POKE 39018, 2% 
(INT(b/2)) 

1960 FOR a=30821 TO 38827:POKE a,PEEK(a+ 
{fileheader-380099) ): NEXT 

1478 m6="":FOR Istileheader+i TO tilehea 
der +14: m$=n$+CHRS (PEEK (I) ) SNS=MIDS(mS, 1, 
8) INS=ENG+". ’INGENS+MIDS(nS, 9,3): NEXT!GOS 
UB 189% 

1488 PRINT:PRINT * Cassettennane :":PRIN 
T " "SSLINE INPUT names: IF names="%" THE 
N name$=N$ 

1990 name$=MIDS(name®, 1,16) 

15098 FOR a=i TO LEN(name$):POKE 29999+a, 
tASC (MID$(name$,a, 1) ) ) NEXT 

1518 GOSUB 2359 

1528 CLS!PRINTSPRINT * Bitte geben Sie d 
ie ge- nuenschte Baudrate ein ( 700 - 3 
68 Baud ) :* 

1538 PRINT :PRINT " °s:LINE INPUT bauds: 
bauds=VAL (baude): IF baud{708 OR baud >36 
@ THEN PRINT ® 

"3:60T0 1539 

1549 baud=INT(333333/baud):POKE 49162,R0 
UNDtLB#CBAUD/P2.6))5POKE 48164,BAUD -256 
#INT(BAUD/256) :POKE 48165, INT(BAUD/236) : 
CALL Aflesl 

1559 PRINT " Bitte ARECU, APLAYO & ein 
e Taste druecken :°’:CALL &BB18 

1568 CLS:PRINT:PRINT *® "INS" =)":PRI 
NT * "ss:IF name$="" THEN PRINT "Unnam 
ed File" ELSE PRINT nane®: 

1578 PRINT *" mit"sINTt 333333/baud) 5” 
Baud*® 

1588 ’%* KOPIER-SCHLEIFE * 

1599 count=9d:POKE 39997, d:WHILE PEEK (399 
97)=8 AND INKEYIEBICYHY 

16090 CALL 49170: BL=PEEK (39994) *256+PEEK 
39993): BL=2048-BL: 

1618 IF PEEK(39997)X)9 THEN bi=bl-1 


42 


1629 POKE 30019, BL-256%INT (BL/256) :POKE 
38029, INTIBL/256) 

1638 POKE 49239, BL-256#1NT (BL/256) : POKE 
48231, INT(BL/256) 

164% count=count+15POKE 38016,count:IF c 
ount =1 THEN POKE 389823, 255 ELSE POKE 38 
923,8 

1658 IF PEEK(39997)<)8 THEN POKE 39917,2 
35 ELSE CALL 498242: IF PEEK(39997) <) 9 T 
HEN POKE 38917,255 ELSE POKE 39017,8 
1668 PRINT " saving Block :"jcount:CALL 
49287:WEND:CALL &BC7A 

1678 CLS:60T0 338 

1668 STOP 

1698 ’%%* FILE HEADER FUER DISKETTENFILES 
*” 

1788 IF PEEK(39818))5 THEN RETURN ELSE c 


.d:FOR a=30000 TO 38815: b=PEEK (a) ;PRINT 


#9 ,CHRS(b) 5: c=c+b: NEXT 
1718 PRINT #9, CHRS(@) SCHRS(D)} 
1728 b=PEEK (38918) :b=INT(b/2)%2: PRINT #9 
‚CHRS(bIJ:c=c+b 
1738 PRINT #9, CHRS(@) SCHRS (BI 5 
1748 FOR a=30921 TO 30022:b=PEEK (a) :c=c+ 
b:PRINT #9, CHRS(bI 5: NEXT: PRINT #9, CHRS(B 
8, 
1759 FOR a=30024 TO 39827:b=PEEK (la) ic=c+ 
b:PRINT #9,CHRS(bI NEXT 
1768 FOR a=380828 TO 30063: PRINT #9, CHR®( 
8) J:NEXT 
1778 FOR a=39924 TO 30825:b=PEEK (a) ic=c+ 
b:PRINT #9,CHRS(bIJSNEXT:PRINT #9, CHRS (8 
3 
1789 b=c MOD 256: PRINT #9 ,CHR$(b) J:b=INT 

(e1256): PRINT #9,CHRS(b) } 
1798 FOR a=30069 TO 39127:PRINT #9, CHRS( 
BII:NEXT 
1898 RETURN 
1818 ’%*%* DISC-DATEN SCHREIBEN #%* 
1828 L=PEEK (39919) +256*PEEK (30020): FOR a 
=31908 TO 1+30999:b=PEEKta): PRINT #9,CHR 
sb) J:NEXT SRETURN 
18308 ’%%* FILE LESEN VON KASSETTE 
1848 POKE 39999 ,Q:CALL 49909 
1858 IF PEEK(39999) =@ THEN E=ß ELSE Es 
255: RETURN 
1869 N6="":FOR 1=300898 TO 39915: N6=N6+CH 
RS(PEEK(T)) NEXT 
1878 NR=PEEK (39916) 
1888 IF PEEK(30817)=8 THEN LAST=9 ELSE L 
AST= 255 
1898 T=PEEK (38918): T=INT(T/2)%*2 
19898 BL=PEEK (39819) +PEEK (39829) #256 
1918 ST=PEEK (39921) +PEEK (39822) *256 
1928 L=PEEK (38924) +PEEK (39825) #256 
1939 EX=PEEK (38926) +PEEK (30827) #256 
1948 LOCATE #1,7,2:5PRINT #1," 

"3:LOCATE #1,7,2:PRINT #1,N8 

1959 LOCATE #1,5,3: IF last=255 THEN PRI 
NT #1,"Letzter Block” ELSE PRINT #1," 


| LISTING 


1968 IF NR>® THEN LOCATE #1,14,4: PRINT # 
L,NR® * 
1979 LOCATE #1,14,5: IF t=9 THEN PRINT Hi 
‚„" Basic " ELSE IF t=2 THEN PRINT #1,” 
Binaer " ELSE PRINT #1," Ascii * 
1988 LOCATE #1,14,6°PRINT Hi,st5" 
1999 LOCATE #1,14,75 PRINT #1,15" * 
2908 LOCATE #1,194,8: PRINT #1,exf" ® 
2018 RETURN 
2828 RESTORE 2089:FOR i= 4090068 TO 49269 
sREAD is:b=VAL("K"+iS):POKE i,bip=p+b:N 
EXT 
2030 ’ 
2048 ’%%% MASCHINENROUTINEN *%%* 
2050 ° 
2060 IF pX>35316 THEN PRINT "Fehler in d 
en DATA-Zeilen !":END: 
287% RETURN 
2088 DATA CD,6E,BC,21,39,75,11,99,90, 3E 
2899 DATA 2C,CD,A1,BC,D2,65,9C,2A,43, 75 
2188 DATA ES,D1,21,18,79,3E,16,CD,Al,BC 
2118 DATA D2,65,9C,CD,71,BC,C9,3E,FF,32 
2128 DATA 3F,9C,CD,71,BC,C9,CD,2E,BD,DA 
2139 DATA 7A,9C,3E,FF,32,3E,9C,C9,3E,0% 
2148 DATA 32,3E,9C,C9,C03,06,70,09,11,88 
2150 DATA 90,CD,9B,BC,D2,80,9C,C9,26,00 
2160 DATA 21,88,99,11,00,91,CD,8C,BC,D2 
217@ DATA 80,9C,C9,CD,8F,BC,D2,89,9C,C9 
2189 DATA 2A,43,75,E5,D1,21,18,79,7E,ES5 
_219@ DATA D5,CD)95,BC,D1,E1,D2,80,9C,23 
220% DATA 1B,7A,B3,C2,AC,9C,C9,CD,92,BC 
2218 DATA D2,80,9C,C9,CD,2E,BD,38,FB,CD 
22208 DATA 2B,BD,C9,06,00,21,88,99,11,Dg 
2230 DATA 84,CD,77,5C,D2,880,9C,22,3B,9C 
2248 DATA C9,3E,09,21,00,00,CD,68,BC,C9 
2250 DATA 21,00,08,11,17,79,2B8,13,22,39 
2268 DATA 9C,ES,DS,CD,89,BC,Di,E1,12,D2 
2270 DATA 80,9C,7C,B5,C2,F9,9C,C9,FE,1A 
22508 DATA CA,00,90D,32,3D,9C,C9,CD,6E, BC 
2298 DATA 21,30,79,11,49,00,3E,2C,CD,PE 
2398 DATA BC,D2,65,9C,21,18,79,3E,16,11 
2310 DATA 90,08,CD,9E,BC,D2,65,9C,CD, 71 
2320 DATA BC,C9,CD,809,BC,D2,3C,9D,CD,86 
23309 DATA BC,C9,FE,AA,CA,38,90,32,3D,9C 
2348 DATA C9,FS,CD,2B,BD,F1,CF,00,94,C9 
2359 ’%*%* EDIT FILEHAEDER #* + 
2368 IF t<>2 THEN RETURN 
2378 CLS:PRINT "Neuer Start ?" 
2388 LINE INPUT esiIF e$="" THEN 2418 
2398 IF VAL(e8)<8 OR VAL(es) 65535 THEN 
PRINT *® 


":G0T0 2389 

2499 POKE 39821,VAL (e$) -256%INT (VAL (e$) / 
256):POKE 39022, INT(VAL(e$) /256) 

2418 PRINT "Neuer Einsprung ?° 

2420 LINE INPUT e$:IF e$="" THEN 2459 
2430 IF VAL(e$)<C8 OR VAL(e$) 65535 THEN 
PRINT " 


":G60T0 2429 


2948 POKE 30026, VAL te$) -256%INT(VALieS$),. 
256):POKE 30927, INT(VALie$) /256) 


2459 GOSUB 1999 
246€ RETURN 
2479 '%*%* VAL ERROR 


248@ IF ERR = 13 THEN IF ERL >235% THEN 


RESUME 2359 


2498 MODE 2:PEN 1:PAPER 9;PRINT *Tippfeh 


ler in"’sERLI" ?" 


2598 END: 'with Horror 


EINFACHE 
SORTIERROUTINE 


Immer wieder erreicht 
uns die Nachfrage nach 
einer einfachen, leicht zu 
verstehenden Sortierrou- 
tine für Zahlen. Der 
Nachteil einer solchen 
Routine ist jedoch, daß 
der Sortiervorgang je 
nach Menge der Daten 
recht lang dauern kann. 
Für eine Highscoreliste 
oder eine kleine Tabelle ist 
der Vorgang jedoch kurz 
genug und mit dem Ver- 
stehen werden sicher 
auch bald die ersten Ver- 
besserungen auftauchen. 
Die Zeilennumerierung 
und die Variablennamen 
sind natürlich dem eige- 
nen Programm entspre- 
chend anzupassen. 
Zuerst wird in Zeile 10 
ein „flag“ auf — 1 gesetzt. 
Diese ‚‚Signalflagge“ ist 


- nichts anderes als ein 


Merker, der in der Schlei- 
fe geändert wird. In 

Zeile 20 wird die Schleife 
eröffnet, deren Höchst- 
zahl bei der Anzahl der zu 
sortierenden Daten weni- 
ger 1 liegt. In Zeile 30 
werden jeweils zwei Wer- 
te verglichen. Ist der 
Wert (it1) kleiner als der 
Wert (i), dann wird auf 
den Befehl NEXT i ge- 
sprungen, denn es gibt an 
diesen Werten nichts aus- 
zutauschen. Hierzu sollte 
vielleicht bemerkt wer- 
den, daß in unserer sortier- 
ten Datei der kleinste 
Wert an erster, der größte 
an letzter Stelle kommt. 
Ansonsten müßte diese 
Zeile natürlich umge- 
stellt werden. Weiter je- 
doch im Listing: 

Ist hier der Wert (it1) 
größer gleich Wert (i), 
dann werden die Daten 
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ausgetauscht. Dazu wird 
zunächst das FLAG-Zei- 
chen geändert, warum, se- 
hen wir später. Der 
Wert (i) wird in Zeile 
50 in eine Zwischenvaria- 
ble (zwwert) gelagert 
und kann damit in Zeile 
60 den Wert von it+l über- 
nehmen. In Zeile 70 er- 
hält schließlich Wert 
(itl) die Zahl dieser Zwi- 
schenvariablen und der 
Austauschvorgang ist ab- 
geschlossen, die Schleife 
sucht nach den nächsten 
beiden Daten bis zu 
maximalen Anzahl der 
Daten. 
Ist die Datei zum ersten 
Male verändert, dann 
wird der FLAG, das 
Signal, überprüft. Es 
wurde ja nur dann auf O 
gesetzt, wenn die Daten 
nicht in der richtigen 
Reihenfolge vorlagen. 
Falls diese Variable im- 
mer noch —1 lautet, dann 
ist der Sortiervorgang ab- 
geschlossen und es kann 
in das eigentliche Haupt- 
programm zurückgekehrt 
werden. Wenn nicht, wird 
die Schleife ein neues 
Mal durchlaufen, solange, 
bis FLAG nicht mehr ver- 
ändert wird. Sie sehen 
nun damit auch, warum 
diese Sortierroutine un- 
ter Umständen viel Zeit 
benötigt. Da es aber in 
vielen Fällen ausreicht, 
hier das endgültige Listing: 
10flag=—1:x=Anzahl 
der Daten 
20FOR i=1 TO x-1 
30IF wert(it1)<=wert(i) 
then goto 80 
40flag=0 
50zwwert=wert(i) 
60 wert(i)=wert(itl) 
7Qwert(itl)=zwwert 
80ONEXT i=IF flag=0 
THEN GOTO 10 
ELSE 
GOTO Hauptprogramm 


LISTING 


ZEITPLAN 


Das Programm Zeitplan eignet sich zur Erstellung von 
Urlaubs- oder Lehrgangsplänen. Weiterhin kann man 
mit dem Programm auch Belegungspläne für Räume 
entwerfen. = 

Die Urlaubs-, Lehrgangs- oder Belegungszeiten werden 
hinter dem Namen in Form eines Balkens grafisch dar- 
gestellt. Der Balken ist entsprechend der Datumsein- 
gabe in einer Jahresübersicht richtig positioniert. Vor 
dem Balken steht der Anfangs- und am Balkenende 
der Endtag des Urlaubs oder der Belegungszeit. Wird 
das Jahr überschritten, so muß ein Anschlußplan er- 
stellt werden. Nach dem Programmstart bestehen drei 
Möglichkeiten der Bearbeitung: 

1. Ein bereits abgespeicherter Plan kann von der Dis- 
kette geladen werden. Hierzu wird die Bezeichnung 
des Planes eingegeben. 

2. Will man einen zu erstellenden Plan später abspei- 
chern, so gibt man die Bezeichnung vorher ein. 

3. Soll der Plan nicht abgespeichert werden, so betä- 
tigt man die Return-Taste. 

Als nächstes wird die Anzahl der Namen (Lehrgänge/ 
Räume) eingegeben. Die Namen sollten nicht über 

13 Zeichen lang sein. Als Korrekturzeichen wird beim 
nächsten Namen die Pfeiltaste unter dem Pfundzei- 
chen betätigt und nach Return kann man die Na- 
men erneut eingeben. 

Nach der Eingabe erscheint eine tabellarische Jahres- 
übersicht mit dem ersten Namen. Jetzt wird das 
Datum von bis eingegeben. Der Punkt hinter Tag und 
Monat wird automatisch gesetzt. Nach der Datums- 
eingabe besteht über die Pfeiltaste eine Korrektur- 
möglichkeit. Falls versehentlich ein unrealistisches 
Datum eingegeben wurde, so nimmt der Computer 
dies nicht an. 

Ist die Eingabe des Anfangs- und Enddatums abge- 
schlossen, wird der Zeitbalken gezeichnet und der 
nächste Name erscheint. 

Ist die Dateneingabe abgeschlossen, so. kann man 
durch Drücken der Taste “s‘ in den Schreibmodus 
wechseln. Der Cursor erscheint oben links und kann 
mit den Cursortasten über den Bildschirm bewegt 
werden. Der Plan wird dabei nicht zerstört. 

Mit der Pfeiltaste entfernt man den Cursor wieder 
und kann nun durch Drücken der Taste “d“ eine 
Hardcopy auf dem Schneider NLQ 401 erhalten. 

Mit der Taste “a““ wird der Plan auf Diskette abge- 
speichert, mit “e“ erfolgt Löschung und Neustart. 


a4 
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3a °’% Zeitplan %* 
68 '%* Ein Programm zur Urlaubs- * 
BB '% und Lehrgangsplanung % 
198 °'%* von Werner E.J. Arndt *% 
115 '’% fuer * 
128 ’% Schneider aktiv * 
139 ’%* CPC 664/6128 * 
149 ' 


138 CLEAR: PAPER @:PEN 1:BORDER i 
168 GOSUB 2130: ’H% Titel Ir 
178 G0OSUB 2279: ’iHHk HC - Routine Hk 
188 MODE 2 
194 PRINT"Plan von Diskette laden 
JLC":PRINT 
288 PRINT"Abspeichern des zu erstellenen 
Plans >26": PRINT 
218@ PRINT"weiter 
>RETURNG 

228 PRINT: INPUT"Eingabe : "ja 
230 ON a G0TO 1699,1788,268 
248 GOTO 268 
238 ERASE name 
269 CLS 
278 MOVE 1,380:DRAW 649,388 
2809 ° 
299 RRRRRRHHRHHHHFK 
308 '%* Eingabeteil * 
318 HRRRRRRHHHHHRE 
329 ' 
330 '%%*%* Namen/Lehrgang/Raum Hk 
399 ' 
358 INPUT"Wieviele Namen"Inamzahl 
369 DIM nanef(nanzahl) 
378 FOR ist TO namzahl 
3880 LOCATE 1,3+i 
398 PRINT is". Name: *, 
#0@ LINE INPUT name$(i) 
a18 IF names(i)="*" THEN GOTO 25% 
428 NEXT 
430 xul4d: ya3Ld: zeiim=d 
aaa CLS 
458 FOR is=sz TO namzahl 
468 LOCATE 1,5+i: PRINT names(i) 
478 ° 
4880 '%%%k Monatstabelle zeichnen X%%* 
498! 
sd TAG 
518 MOVE 1,380: DRAW 642,388 
528 MOVE 1,334:DRAW 649,334 
330 MOVE 140, 380:DRAW 149,1 
548 MOVE 188,380: DRAW 189, 1:MOVE 145,359 
sPRINT"Jan"} 
559 MOVE 216,3880:DRAW 216,1:MOVE 185,358 
:PRINT"Feb"} 
568 MOVE 256,380: DRAW 256, 1:MOVE 221,358 
sPRINT’Mrz"j 
578 MOVE 295,380: DRAW 295, 1:MOVE 261,358 
PRINT "Apr"; 

388 MOVE 335,389: DRAW 335, 1:MOVE 300,358 


LISTING 
RRRHARHHRRRRRRRRARRAHHRBSHAHHRHHEE 


:PRINT"Mai"”5 - 

598 MOVE 374,380: DRAW 374, 1:MOVE 349,339 
:PRINT"Jun"f 

#2R MOVE 414,380: DRAW 414, 1:MOVE 379,358 
:PRINT"Jul"f 

#18 MOVE 454,380: DRAW 454, 1:MOVE 419,358 
:PRINT"Aug"j 

628 MOVE 493,389: DRAW 493, 1:MOVE 459,359 
:PRINT"Sep"} 

639 MOVE 333,389: DRAW 533, 1:MOVE 498, 359 
:PRINT"OKt"} 

#49 MOVE 372,389: DRAW 372, 1:MOVE 338, 358 
:PRINT"Nov"$ 

#58 MOVE 612,380: DRAW 612,1:MOVE 377,359 
:PRINT"Dez"j 

668 TAGOFF 

678 ° 

689 '’HK% Eingabe Urlaubszeit tk 

699 

7@8 LOCATE 1,1:INPUT"Urlaub vom : . 
uvat 

718 k=8 

728 LOCATE 29, 1:INPUT". *",uan 

738 LOCATE 24,1:INPUT". bis *°,uet 

748 LOCATE 34,1: PRINT"." 

739 LOCATE 35, 1: INPUT" ",uenm 

768 LOCATE 38, 1: PRINT". K 
orrektur > de 

778 IF uam=2 AND uat=29 THEN mei 

788 IF uem=2 AND uet=29 THEN m=2 

798 IF uam=2 AND uat=29 THEN uat=28 

8989 IF uem=2 AND uet=29 THEN uet=28 

812 as=INKEYS:IF a$="" THEN 818 

829 IF a$="*" THEN LOCATE 1,1 

838 IF as="*" THEN PRINT" 


849 z=i 

859 IF a$="*" THEN GOTO 689 
86% GOSUB 1870 

878 IF k=1 THEN GOTO 689 

888 i=z 

899 GOSUB 999: 'K%% Balken Ik 
988 LOCATE 1,1:PRINT*® 


919 NEXT i 

92% as=INKEYS:IF as="" THEN 928 

938 IF as="d" THEN CALL KIRRR: IR Aufru 
+ HC-Routine K%* 

948 IF a%="s" THEN 1549: '%%% Schreiben * 
2 

959 IF a$="a" THEN SAVE bild#,b,49132,16 
382 

968 IF a4="e" THEN G0TO 18 

978 GOTO 928 

988 ' 

998 BRRHRRRRRHHRRRRRHBRHBHEE 

1298 ’% Zeichnen des Balkens * 

1818 RRHRRRRRHHRHRRHHBHRRHHEN 


LISTING 


1119 
1128 
1139 
1149 
1159 
1168 
1178 
1189 
1198 
1209 
1218 


’%% Umrechnen der Urlaubszeit #%% 
’ 


IF uam=i THEN x=x 

IF uam=2 THEN x=x+48 

IF uam=3 THEN x=x+76 

IF uam=4 THEN x=x+115 

IF uam=S THEN x=x+155 

IF uam=& THEN x=x+194 

IF uan=7 THEN x=x+234 

IF uam=8 THEN x=x+274 

IF uan=9 THEN x=x+313 

IF uan=id THEN x=x+353 

IF uan=il THEN x=x+392 

IF uam=12 THEN x=x+432 

GOSUB 1359: ’#t% Tagesdifferenz I%% 
uatzuatkl. 3: uet=uet#l.3 

MOVE x+uat,y:DRAW c+uet,y:MOVE x+ua 


t,y+25DRAW c+uet, y+2:5MOVE x+uat,y-2: DRAW 
c+tuet,y-2 


1229 
1239 
1249 
1258 
1269 
1278 
1288 
1299 
1308 
1319 
1329 
1339 
1349 


IF uam=2 AND m=1 THEN uat=29%41.3 
IF uem=2 AND m=2 THEN uet=29%1.3 
uatzuat/1.3:uetzuet/L.3 

TAG 

MOVE x+(uat#1.3)-32,y+6: PRINT uatj 
MOVE c+(uet#1.3),y+6:PRINT uetj3 
TAGOFF 

yzy-16:n=d 

uat=d: uan=d; uet=d; uem=d 

x=149 

c=d: d=9 

RETURN 

, 


I IHRHRBRRRRRBRRBRRRHHRRBRHHRRHHHHFN 
’%* Berechnung der Tagesditfferenz * 


IF uem=1 THEN c=d 

IF uen=2 THEN c=d+49 
IF uem=3 THEN c=d+76 
IF uem=4 THEN c=d+115 
IF uem=5 THEN c=d+135 
IF uen=6& THEN c=d+194 
IF uem=7 THEN c=d+234 
IF uem=8 THEN c=d+274 
IF uem=9 THEN c=d+313 
IF uem=18 THEN c=d+353 
IF uem=11 THEN c=d+392 
IF uen=i2 THEN c=d+432 
RETURN 

’ 


IIRRRRHRARHRHRHRRRRRHRRRRHHHER 
’%* Beschriftung der Tabelle * 
I IBHHHRRRRRRRHHRRRRHARHHHHHHN: 


KEY DEF 1,1,9 
KEY DEF 2,1,18 


1699 
1618 
1628 
1639 
1649 
1658 
1668 
1678 
1688 
1698 
1708 
1718 
1728 
1738 
1748 


KEY DEF 8,1,8 

KEY DEF 8,1,11 

CURSOR 1 

as=INKEY$ 

IF a6="*" THEN CURSOR 8 
IF a$="*" THEN GOTO 928 
PRINT as} 

6OTO 1638 

’ 


I RRRBARBHHHHHE 
’* Plan laden * 
IHRHRRRRRHHRHRR 
’ 


CLS 

INPUT"Bezeichnung : "jbild$ 
LOAD bilds 

G0TO 929 

’ 


I RRRRRRRRRRRRRRRRRRRRHHRRRRRRRN 
’%* Bezeichnung zum Abspeichern * 
HRRHRRRRRRRRRRRRBHRRRRRRHHHHHCK 


CLS 

INPUT"Bezeichnung zum Abspeichern ( 
8 Zeichen) : "jbilds 

CLS 

G0TO 278 

I RRRHRRRRAHHRHRRRHFHE 

’%* Eingabepruefung * 
IRRRHRHARHHRRRHHHREE 


IF uat<i OR uat )31 THEN GOSUB 2078 
IF uet(1 OR uet >31 THEN GOSUB 2878 
IF uam{i OR uam >12 THEN GOSUB 2078 
IF uem‘{i OR uem >12 THEN GOSUB 2878 
IF uam=2 AND uat >29 THEN GOSUB 297 
IF uen=2 AND uet >29 THEN GOSUB 297 
IF uam=4 AND uat >38 THEN GOSUB 297 
IF uem=4 AND uet >38 THEN GOSUB 297 
IF uam=6 AND uat >38 THEN GOSUB 297 
IF uem=6 AND uet >38 THEN GOSUB 297 
IF uam=? AND uat >39 THEN GOSUB 297 
IF uem=9 AND uet >38 THEN G0SUB 297 


IF uam=il AND uat >38 THEN GOSUB 29 


IF uem=11 AND uet )38 THEN GOSUB 29 


RETURN 
’ 


ANZEIGENSERVICE 


Die große Börse für jeden Zweck in SCHNEIDER AKTIV. Kostenlos für Privat-Inserenten. Spottbillig für gewerbliche Anbieter. Ein- 
fach Coupon ausschneiden, fotokopieren 0.ä., ausfüllen und ab die Post — Freimachen nicht vergessen! — Unsere Adresse steht 
auf dem Coupon, ebenso die Preise für gewerbliche Anbieter! Achtung! Wir weisen ausdrücklich darauf hin, daß wir offensicht- 
lich gewerbliche Anzeigen nicht kostenlos veröffentlichen und uns jedweden Abdruck kostenloser Anzeigen vorbehalten müssen, 
insbesondere, wenn deren Inhalt gegen geltendes Recht verstößt. Private Chiffreanzeigen werden nicht aufgenommen. Für Pri- 
vatanbieter: etwa bis zu acht Zeilen a 28 Anschläge. Für gewerbliche Anbieter: 5 DM p.mm. bei beliebiger Größe. 


EETFEEREFTTEL SEIT FRFEITTEITER 


SCHNEIDER AKTIV Name 
ANZEIGENABTLG Vorname 
POSTFACH 1161 Straße /Hausnr. 
D-8044 UNTERSCHLEISSHEIM _pLz/0rt 


m > 


DAS SONDERANGEBOT: 
PRIVATE KLEINANZEIGEN 
SIND KOSTENLOS 


Das bietet Ihnen ab sofort SCHNEIDER AKTIV: KLEINAN- 
ZEIGEN SIND KOSTENLOS FÜR PRIVATANBIETER! Su- 
chen Sie etwas, haben Sie etwas zu verkaufen, zu tau- 
schen, wollen Sie einen Club gründen? Coupon ausfüllen, 
auf Postkarte kleben oder in Briefumschlag stecken und 
abschicken. So einfach geht das. Wollen Sie das Heft 
nicht zerschneiden, können Sie den Coupon auch fotoko- 
pieren. Oder einfach den Anzeigentext uns so schicken, 
auf Postkarte oder im Brief. Aber bitte mit Druckbuchsta- 
ben oder in Schreibmaschinenschrift! 

Und: Einschließlich Ihrer Adresse und/oder Telefonnum- 
mer sollten acht Zeilen a 28 Anschläge nicht überschrit- 
ten werden. 

ACHTUNG: WICHTIGER HINWEIS! 

Wir veröffentlichen nur Kleinanzeigen privater Inserenten 


kostenlos, gewerbliche Anzeigen kosten pro Millimeter 
DM 5,00 plus Mehrwertsteuer! 

Wir versenden für Privat-Inserenten keine Beleg- 
Exemplare! 

DIE INSERTION IST NICHT VOM HEFTKAUF ABHÄNGIG! 
Chiffre-Anzeigen sind nicht gestattet! Wir behalten uns 
vor, Anzeigen, die gegen rechtliche, sittliche oder sonsti- 
ge Gebote verstoßen, abzulehnen! 

Anzeigenabdruck in der Reihenfolge ihres Eingangs, kein 
Rechtsanspruch auf den Abdruck in der nächsten Ausga- 
be! 

Wir behalten uns vor, Anzeigen, die nicht zum Themen- 
kreis des Heftes — Computer — gehören, nur insoweit 
zu berücksichtigen, wie es der Umfang des kostenlosen 
Anzeigenteils zuläßt. 
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NUTZEN SIE UNSEREN BEQUEMEN POSTSERVICE 


KOMMT _ 
REGELMÄSSIG 
ZU IHNEN 


INS HAUS 


Das unabhängige Magazin 
für Schneider-Computer 


GARANTIE! 

Sie können diesen Abo-Auftrag bin- 
nen einer Woche nach Eingang der 
Abo-Bestätigung durch den Verlag 
widerrufen — Postkarte genügt. An- 
sonsten läuft dieser Auftrag jeweils 
für zwölf Ausgaben, wenn ihm nicht 
vier Wochen vor Ablauf widerspro- 
chen wird, weiter. 


Finden Sie Ihre SCHNEIDER AKTIV nicht am Kiosk? 
Weil sie schon ausverkauft ist? Oder ‚‚Ihr‘‘ Kiosk 
nicht beliefert wurde? Kein Problem! Für ganze 60 
DM liefern wir Ihnen per Post zwölf Hefte ins Haus 
(Ausland 80 DM). Einfach den Bestellschein aus- 
schneiden — fotokopieren oder abschreiben, in ei- 
nen Briefumschlag und ab per Post (Achtung: Porto 
nicht vergessen). SCHNEIDER AKTIV kommt dann 
pünktlich ins Haus. 


ee Ei au Taube a a rt a ee cr Ans he nn Et >Z 
ABO-SERVICE-KARTE 


Ich nehme zur Kenntnis, Ja, ich möchte von Ihrem Angebot Ausgaben an untenstehende An- 
daß die Belieferung Gebrauch machen. schrift. Wenn ich nicht vier Wochen 
erst beginnt, wenn die Bitte senden Sie mir bis auf Widerruf vor Ablauf kündige, läuft diese 
Abo-Gebühr dem Verlag ab sofort jeweils die nächsten zwölf Abmachung automatisch weiter. 
zugegangen ist! Name 

Vorname 

Straße /Hausnr. 

PLZ/Ort 

Ich bezahle: 


U] per beiliegendem Verrechnungsscheck 

U] gegen Rechnung 

U] bargeldios per Bankeinzug von meinem Konto 
bei (Bank) und Ort 


Kontonummer 

Bankleitzahl 
SCHNEIDER AKTIV (steht auf jedem Kontoauszug) 
ABO-SERVICE 6/87 Unterschrift _ 


POSTFACH 1161 Von meinem Widerspruchsrecht habe ich Kenntnis genommen. 
D-8044 


UNTERSCHLEISSHEIM Unterschrift 6/87 
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PROGRAMMSERVICE 


Hiermit bestelle ich in Kenntnis Ihrer Verkaufsbedingun- 
gen die Listings dieses Heftes auf . 

U] Kassette (20 DM) L]) Diskette (30 DM) 

DO Das Superangebot zuDM 30 Di zu DM 40 


Ich zahle: (Zutreffendes bite ankreuzen!) 
per beigefügten Scheck [] Schein U) 


Gegen Bankabbuchung am Versandtag U] 


Meine Bank (mit Ortsname) 

Meine Kontonummer 

Meine Bankleitzahl (steht auf jedem Bankauszug) 

Vorname Nachname 
Str./Nr. PLZ/Ort 6/87 


Verkaufsbedingungen: Lieferung nur gegen Vorkasse oder Bankabbuchung. Keine Nachnahme. 
Umtausch bei Nichtfunktionieren. 


Unterschrift 
Bitte ausschneiden und einsenden an 


SCHNEIDER AKTIV 
KASSETTENSERVICE 6/87 
POSTFACH 1161 

D-8044 UNTERSCHLEISSHEIM 


En a 2 a as me a mu a en Bu see = 
LESER WERBEN LESER 


GEWINNEN SIE EINE COMPUTER- 
UHR! Und zusätzlich eventuell 
noch ein großes Computer-Buch. 
Oder ein Paket Disketten. ODER 
AUCH EINEN COMPUTER — 
ODER EINE DISKETTENSTATION! 
Wie? Sie werben einen Abonnen- 
ten. Dann haben Sie auf jeden Fall 
schon die Computer-Uhr gewon- 
nen. Zusätzlich verlosen wir unter 
allen, die mitmachen, jeden Mo- 
nat vier weitere wertvolle Preise. 
Und alle sechs Monate gibt es ei- 
nen Hauptpreis unter allen Abo- 
Werbern zu gewinnen. Also: Mit- 
machen. Mitgewinnen. 


Ja, ich mache mit beim Abo- 
Wettbewerb. Ich habe 


Herrn /Frau 
Straße /Hausnr. 
PLZ/Ort 


als neuen Abonnenten für SCHNEI- 
DER AKTIV geworben. 


Der neue Abonnent war bisher 
noch nicht Bezieher dieser Zeit- 
schrift. 

Als Prämie erhalte ich nach Ein- 
gang des Abo-Entgeltes auf jeden 
Fall eine Computer-Uhr, wie abge- 
bildet, und nehme zusätzlich noch 
an der Verlosung des Monats so- 
wie der halbjährlichen Hauptprei- 
se teil. Mir ist bekannt, daß der 
Rechtsweg ausgeschlossen ist. 
Meinen Preis senden Sie an 


Name 

Straße/Hsnr. 

PLZ/Ort 

(Bitte ausschneiden und zusam- 


men mit der Abo-Bestellkarte links 
einsenden!) 6/87 


© DM 14,80 
ÖS 124 
SFR 14,80 


u N‘ 
Br 
N 


LISTING 


2078 '%% UP Neueingabe ##* 
2089 ’ 
2898 LOCATE 1,1:PRINT* 


2108 kei 

2118 RETURN 

2120 ° 

2138 RRRRRAHRRHHN 

2148 '’% Titelbild * 

2159 HRRRHHARHHHEN 

21608 ° 

2178 MODE 

2188 MOVE 1,1:DRAW 639, 1:DRAW 639,399: DR 
AW 1,399: DRAW 1,1 

2198 LOCATE 5,3:PRINT"Zeitplan" 

2288 LOCATE 5,4:PRINT’________" 

2218 LOCATE 2,8:PRINT"Urlaubs -" 

2228 LOCATE 3, 18: PRINT"Lehrgangs „ 

22389 LOCATE 4,12:PRINT"Belegungsplanung" 


2248 LOCATE 2,19: PRINT CHRS(164) : LOCATE 
3, 21:PRINT "Werner E.J. Arndt 

2258 RETURN 

2260 °’ 

2278 RRRRRRRRRRRRRRHHHHHER 

2288 '%* Hardcopyroutine % 

2298 HRRRRHRRHRRRRRHHHHHGR 

2308 ’ 

2318 RESTORE 2388 

2328 p=k9299: MEMORY p-1 

2339 n=p 

2349 READ a®% 

2358 IF a®="EOF" THEN RETURN 

2368 POKE n,VAL("K"+aS) ınen+l 

2378 GOTO 2349 

2388 DATA fe,90,28,b,fe,3,28,7,f8,4,28,3 
‚fe,7,c2,32,29,be,cd,d8,bb,e3,d5,cd,dS,b 
b,e5,d5,21,e,0,22,2e,be,21,6,9,22,2c,be, 
21,2,9,22,2a,be,3a,29,be,fe,8,28,34,te,4 
‚28,12 

2399 DATA 6,6,21,2a,be,dd,4e,8,71,dd,23 
‚23,18,77,te,3,28,1e 

240998 DATA dd,6e,2,dd,66,1,dd,5e,2,dd, 36 
‚3,cd,d2,bb,dd,de,4,dd, 66,5, dd,3e,6,dd,3 
6,7,cd,ct,bb,cd,d8,bb,ed,33,18,be,22,1a, 
be,cd,d5,bb,23,ed,53,1@,be,22,12,be,di,e 
i,cd,ct, bb, di,el,cd, 42, bb 

2418 DATA 6,18 ‚21,8,be, af,77,23,18,tc,6 
‚19,2b,e3, 2a, 28,be,29,e3, 30, 2,cb, dö,2b,e 
3, 19,+6, 01,6, 19,21,+,be,e5, 2a, 2c,be,29,e 
3,39, 2,cb,ce,2b,e3,12d,f6,81,6,10,21,f,be 
‚e5,28,2e,be,29,03,30,2,cb,c6,2b,83,18,f 
6,el 

2428 DATA 21,0,9,e5,d1,6,8,dd,21,2@,be, 
e5,d5,e35,cd,f8,bb,dd,71,2,dd,23,ei,di,ci 
‚13,10,#f 

24398 DATA 21,38,42,22,30,be,21,cd,i1e,22 
‚32,be,21,bb,c®,22,34,be,21,cd,28,22,36, 
be,21,bd,38,22,38,be,21,3,78,22,3a,be,2 


1,cd, 2b, 22,3c,be, 21,bd,c9, 22, 3e,be, 2a, 86 
‚bd,cb,fc,22,2e,be,3e,ct,32,2d,be 

2448. DATA 2a,18,be,22,ic,be,ed,5b, la,be 
‚b7,ed,52,22,1e,be 

2458 DATA 2,2,2,2,2,0,2,2,0,2,2,2,0,0,2, 


.18,6,6,9,cd,30,be,d® 


2468 DATA 22,19,be,22,14,be,eb,2a,ic,be 
‚es,cd,f2,bb,di1,7a,b7,7b,28,c,fe,4,30,8, 
f@,2,28,2,38,b,18,3,cd,26,be,cd, 26, be,cd 
‚2&,bc,22,2a,be,2a,12,be,ed,5b,14,be,b?, 
ed,52,2b,cb,7c,28,2e 

2478 DATA 11, #8, HH, 2a,ic,be,19,22,1c,be 
‚2a,ie,be,19, 22, le,be, 2b,cb, 7c,c9 

2468 DATA 6, 1b,cd,30,be,d@,6,4a,cd,39,b 
e,6,12,cd,30,be,6,d,cd,39,be,18,82,18,c3 
2498 DATA 23,7c,b7,26,0,28,5,7d,te,39,3 
6,2,28,30,54,7d,cb,3#,85,85,5,7d,cb, 3f, 
cb,3f,cb,3f,ed,4b,14,be,9,22,14,be,32,16 
‚be 

2508 DATA 6,1b,cd,30,be,d2,6,5a,cd,39,be 
‚93,cd,390,be,42,cd,30,be, 18,31 

2518 DATA di1,13,3e,6,32,2c,be,3a,28,be, 
47,cd,39,be,33,29,be,47,cd,39,be,c1,18,2 
6,33,29,be,47,cd,39,be,c1,12,14,2a,2a,be 
‚cd,29,bce,22,2a,be,21,16,be,35,28, 91 
2528 DATA 11,29,be,6,4,c5,38,3,32,2c,be 
‚6,2,05,21,90,90,22,28,be,1a,4f,dS,2a,ie,b 
e,7c,b?,7d,2a,2a,be,20,e,fe,4,30,a,fe,2, 
28,66, 38,62,18,2f,18,9f 

2538 DATA cd, 2d,be,St,eb,7e,2e,2c, 26,28 
‚13,28,29,cb,57,28,4,cb,c6,cb,ce,e6, 3,28 
‚Ss, 2d,cb,cö,cb,ce,eb,dS,11,8,78,7c,86,38 
»28,3,11,680,37,19,di 

2548 DATA cd,2d,be,Sf,eb, 7e,2e,2c,86,28 
‚13,28,29,cb,357,28,4,cb,ce,cb,d6,86, 3,28 
‚5, 2d,cb,ce,cb,dö,@b,d3,11,0,78,7c, 86,38 
‚22,3,11,68,37,19,di 

2559 DATA 18,4,18,28,18,2d,cd,2d,be,Sf, 
eb, ?e,2e,2c,86,28,13,28,29,cb,57,28,4,cb 
‚de,cb,e6,06,3,28,5,2d,cb,de,cb,e6, eb, d5 
2568 DATA cd,2d,be,S5t,eb,?7e,2e,2c,a6,28 
‚13,28,29,cb,357,28,4,cb,e6,cb,ee,06,3,28 
‚93, 2d,cb,eö,cb,ee,eb,18,ae,EüF 


LISTING 


VERBESSERUNG: 
SYMBOL GENERATOR 
(4/87) 


So schnell ging es noch 
nie und dafür sind wir 
Michael Folz, dem Autor 
des Programmes, beson- 
ders dankbar und es 

freut uns, daß der Sym- 
bolgenerator nunmehr 
auf allen drei CPC-Rech- 
nern läuft. Folz bezieht 
sich auch auf Fehler, die 
durch sich durch Unge- 
nauigkeiten bei der Be- 
schreibung eingeschlichen 
haben. Diese Fehler gehen 
natürlich in erster Linie 
auf unsere Kappe, je- 
doch möchten wir noch 
einmal darum bitten, eine 
möglichst genaue Anlei- 
tung oder Programmbe- 
schreibung mitzuliefern. 
1. Kompatiblität: 


Das Programm ist in der 
abgedruckten Form nicht 
zum CPC 664 und CPC 
6128 kompatibel. Es han- 
delt sich vor allen Dingen 
um Systemadressen und 
Vektoren, die bei den 
neueren Schneider-Rech- 
nern verschoben sind. 
Durch Abänderung fol- 
gender Zeilen läßt sich _ 
dieses Manko aber behe- 
ben. Im Ladeprogramm: 
Allgemein: 

Durch einen Renumber 
müssen die Parameter 

in Zeile 60 geändert wer- 
den, da sonst eine falsche 
Zeile ausgegeben wird: 
60 CLS: PRINT “Check- 
sum Error in Zeile“; 
70+417&10)x*“!11!*:STOP 
Das Icon wird in den Zei- 
len 1100 bis 1120 als 
CHR$(234) geprinted. 
Das Zeichen läßt sich 
nach Bedarf anpassen. 
Michael Folz, 

Sipplingen 


1 REN RRRRRRIRRRHIRIBSISIESESESESESEHFSFSESESFSESEIENE 
2 REM Aenderungen fuer Symbol- 

3 REM Generator 

4 REM Bee EEE 
20 LOCATE 3,25:PRINT "ESC SYMBOL GE 
NERATOR (C) 1986 ESCape 1.....";: 
POKE EB72C,79:POKE EAE60,&FB:POKE & 
AE61,6A6:MEMORY &E3FFF :OPENOUT" !dumm 
y":MEMORY HIMEM-1:CLOSEOUT:GOSUB 40 
:RUN" !symbol1.001” 

30 PRINT TAB (U)""; :x=PEEK( 68736) +2 
S6*PEEK( 68737) : y=PEEK( &B734) #8: FOR 
i=0 TO 6:FOR j=1 TO LEN(a$) :z=ASC(M 
ID$La$,j,1))*8:FOR kK=7 TO 0:STEP -1 
PRINT CHRA$( 175%*( ( PEEKLx-y+z+1) AND 
(2°K)) /C2°K)) +32) ; :NEXT:PRINT "” RS 
NEXT:PRINT:PAINT TAB(U)""; :NEXT:RET 
URAN 

120 DATA c9,dd,6e,00,dd,66,01,22,36 
‚b?,3e,ff,32,35,b7,3c,07b4 

130 DATA f5,cd,5d,bb,3e,09,cd,5a,bb 
‚f1,3c.,20,73,af,32,35,08b9 

140 DATA b7,c9,21,80,c6,11,00,a6,06 
‚08,c5,e5,1a,77,06,06,05ee 

150 7 Mr HR HRHHRIHSISIRIHIHIHEIE HEISE 
151 *° Aenderungen im Hauptprogramm 
152 in Zeile 120 

153 0 MRRRRRHRRRRHIHHHSISIHRIRIHTII EISEN 
154 FOR i=0 TO 3:CALL a1,a6,+i*6B00 
:NEXT:POKE &8735,0:FOR i=0 TO 7:POK 
E a8+i1,0:NEXT 


DIAGRAMM 


Was nutzen die schönsten Zahlenkolonnen, wenn 
man nicht schnell einen Überblick zu den Werten be- 
kommen kann. Ein Bild sagt nun einmal mehr als 
tausend Worte, oder auch tausend Zahlen (um das 
Sprichwort einmal abzuwandeln). Dies mag sich 
auch Günter Schmidt gedacht haben, der für Schnei- 
der aktiv das Kassenbuch zur Belegabrechnung pro- 
grammierte. Sein Programm ‚„Balken—Linien— 
Torten-Grafik“ ist allerdings nicht nur in Verbindung 
mit dem erstgenannten Listing funktionsfähig, son- 
dern gilt als eigenständiges Programm. 


Das Programm stellt die Werte der Monate Januar 
bis Dezember eines Jahres in einer dreidimensionalen 
Grafik dar. Nach dem Start des Programmes erfolgt 
eine kurze Erklärung und es wird auf die Eingabe 
des Namens der Grafik, des Jahres und der Ober- 
grenze der Werte gewartet. Aus den bekannten 

12 Werten der einzelnen Monate wird der höchste 
als Obergrenze genommen. Als erstes werden die Bal- 
ken dargestellt. Die Kopfzeile ist gleichzeitig Einga- 
be- und Menüzeile. Nach jeder der zwölf Eingaben 
werden die dazugehörigen Balken gezeichnet. Danach 
kann die Grafik abgespeichert oder ausgedruckt wer- 
den, oder es geht weiter zur Liniengrafik. Die Werte 
werden dabei übernommen und die Linien gezeich- 
net. Wie bei der Balkengrafik dient die Kopfzeile als 
Menizeile. 

Zuletzt kann eine Tortengrafik angefordert werden. 
Hierbei ist etwas Geduld erforderlich, da der Kreis 
sehr langsam gezeichnet wird (STEP 0.2). Zwar wäre 
ein schnellerer Ablauf möglich, jedoch würde dann 
der Kreisrand nicht durchgezeichnet werden. Auf ei- 
nen RSX-Befehl (CIRCLE) wurde aus Kompatibili- 
tätsgründen zum CPC 6128 verzichtet. 

Beim Abspeichern der Bilder werden vom Namen der 
Grafik die jeweiligen ersten drei Buchstaben über- 
nommen. Die letzten zwei Ziffern des Jahres werden 
der Abkürzung angefügt. Beispiel: “Testbild 1987“ 
wird zum Speichernamen “TES87-TO.BIN“ bei der 
Tortengrafik, zu “TES87;LI.BIN“ bei der Linien- 
grafik und zu “TES87-BA.BIN“ beim Balkendia- 
gramm. Um den jeweiligen Bildschirm auszudrucken, 
muß vor Beginn der Arbeit eine Hardcopy-Routine 
eingeladen werden, 
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LISTING 


4 IHRER TERIEISEIEIEIE TEE IE IE EEE NE IE EEE 
2 ’#BALKEN-LINIEN-TORTEN-DIAGRAMM*® 
3 # VON # 
4 8% GUENTHER SCHMIDT * 
5 ’%* FUER * 
6 ’* SCHNEIDER AKTIV * 
7 8% CPC 464/664/6128 = 
8 


CERRRTUIIIIIETHIHIRTEIE IE TITTEN 


10 OPENOUT "”dummy” 
20 MEMORY HIMEM-1 
30 CLOSEOUT 


50 ’ 
60° 

70 MODE 2:INK 0,0:INK 1,26:BORDER O 
80 DIM wert( 12) :DIM ein( 12) 

90 ’ =====> WINDOW BESTIMMEN <====- 
100 WINDOW#1,2,79,25,25:PAPERf1,1:P 
EN#1,0:CL5f1 

110 WINDOW#2,13,68,2,2:PAPER#2,0:PE 
N#2,1 

120 GOSUB 680 

130 PRINT#2," ==> BALKEN/LINIEN/TOR 
TEN-GRAPHIK <==>(c) 65.1987 <===" 
140 GOSUB 820 

150 GOSUB 800 


160 * =====> DATEN EINGEBEN <===== 
170 LOCATE 4,21:PRINT CHR$(24);"” NA 
ME DER GRAPHIK : ";CHA$(24) 

180 LOCATE 4,22:PRINT CHR$(24);" JA 
HR : ";CHRA$( 24) 

190 LOCATE 4,23:PRINT CHA$( 24) ;” OB 
ERGRENZE : ";CHR$( 24) 

200 LOCATE 26,21:INPUT name$ 

210 LOCATE 26,22:INPUT jahr$ 

220 LOCATE 26,23:INPUT grenze 


230 LOCATE#1,30,1:PRINTf1," ENTE 
A * 
240 
250 
260 


GOSUB 800 

CALL &BB06:CLS:CL5#1 

h=8:605UB 680 

270 ° =====> MONATE AUSGEBEN <===== 
2850 FOR i=1 TO 12 

290 z=z+1 

300 READ a$ 

310 IF z<2 THEN LOCATE#1,2,1:PRINT 
#1,a$:GOTO 330 

320 LOCATE#1,i*6-4,1:PARINT#1,a$ 

330 NEXT 

340 LOCATE 74,25:PRINT jahr$ 

350 IF 1=-1 THEN RETURN 

360 
370 FOR i=2 TO 19::L0OCATE 78,25-i:P 
AINT CHA$( 157) :NEXT:LOCATE 78,24:PRA 
INT CHR$( 153) :LOCATE 78,5:PRINT CHR 
$( 149) :LOCATE 78,4:PRINT CHR$( 149): 
LOCATE 78,3:PRINT CHRA$( 240) 

380 FOR i=1 TO 19 STEP 3:L0OCATE 77, 
25-i:PRINT CHRA$( 154) :NEXT 


390 LOCATE 72,2:PRINT grenze 
400 ORIGIN 10,312:F0OR i=1 TO 600 ST 
EP 4:MOVE 0O,-2:DRAW i,-2:MOVE 0,0:D 


RAW i,0:NEXT 
410 z=0 
420 *° =====> WERTE EINGEBEN <===-=== 


430 PAPER#2,0:PEN#2,1:CL5#2 
440 num=num#+1 

450 IF num=13 THEN 910 L 
KENGRAPHIK ENDE <----- 
460 LOCATE#2,4,1:PRINT#42," Eingabe 
Monat :";num:LOCATE#2,25,1:INPUT#2,e 
ingabe 

470 IF eingabe>grenze THEN GOSUB 80 
0:LOCATE#2,24,1:PRINT#2, "Eingabefeh 
ler!!":FOR i=1 TO 1000:NEXT:LOCATE# 
2,24,1:PAINT#2,” ":G 
OTO 460 

480 ausgabe=( eingabe*270) /grenze 
490 wert( num) =ausgabe :ein( num) =eing 
abe 
500 
510 
520 
530 


* =====> BALKEN ZEICHNEN <====-= 
z=z+1:IF z<2 THEN 530 
n=n+4AB:v=v+1 

ORIGIN 5+n,20 

FOR i=1 TO ausgabe STEP 2.2 
MOVE 10,i:DRAW 40,i,1:DRAW 50,h 
MOVE 50,i:PLOT 40,i1,0 

NEXT 

ORIGIN 15+n,20+i1:MOVE 0,0:DRAW 
10,h,1:DRAW A0,h 

590 TAG 

600 IF v<>1 THEN 620 

610 ORIGIN 10+n,350:PAINT eingabe;: 
GOTO 630 

620 ORIGIN 10+n,335:PRINT eingabe;: 
v=0 

630 TAGOFF 

640 GOSUB 800 

650 FOR i=1 TO 10:L0CATE#2,23+1,1:P 
AINT42,” ”; :NEXT 

660 GOTO 440 

670 ° =====> RAHMEN <=-==== 

680 ORIGIN 0,0 

690 DRAW 0,379:DRAW 639,379:DRAW 63 
9,0:DRAW 0,0 

700 ORIGIN 2,2 

710 DRAW 0,375:DRAW 635,375:DRAW 63 
5,0:DRAW 0,0 

720 ORIGIN 4,4 

730 DRAW 0,371:DRAW 631,371:DRAW 63 
1,0:DRAW 0,0 

740 LOCATE 12,1:PRINT CHRA$( 150) ;:FO 
A i=1 TO 56:PRINT CHA$( 154) ; :NEXT:P 
AINT CHR$( 156) 

750 LOCATE 12,2:PRINT CHA$( 149) ;:FO 
A i=1 TO 56:PAINT ” ";:NEXT:PRINT C 
HR$C 149) 

760 LOCATE 12,3:PRINT CHRA$( 147); 
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:Fo 39 


LISTING 


R i=1 TO 56:PRINT CHR$( 154) ; :NEXT:P 

RINT CHR$( 153) 

770 PRINTf2,”" ==========>3 BALKEN-GR 

APHIK <========>3(c) 65.10.86 <=-==" 

780 RETURN 

790 ° =====> PIEPS <===-== 

800 SOUND 1,199, 14,7:50UND 2,200, 14 
‚7:RETURN 

810 ° =====> TEXT <==-=-=-=- 

820 LOCATE 4,5:PRINT"Dieses Program 

m stellt die Werte der Monate 1 - 1 

2 in Form von ” 

830 LOCATE 14,7:PRINT ” ";CHRA$(24); 

"BALKEN - LINIE - TO 
AR TE ";CHR$(24) 

840 LOCATE 4,9:PRINT"”dreidimensiona 

1 dar.Die Obergrenze der Werte muss 
vorher eingegeben” 

850 LOCATE 4,11:PRINT"”werden.Dabei 

sollte die Obergrenze >= dem hoechs 

ten Einzelwert sein.” 

860 LOCATE 4,13:PRINT"Weiter werden 
der ";CHR$(24) ;” NAME ";CHA$( 24) ;" 
der Graphik und das ";CHR$(24);” J 

AHA ";CHR$(24);" Fuer die” 

870 LOCATE 4,15:PRINT"”Ausgabe des B 

ildschirmes auf den Drucker benoeti 

gt.” 

880 LOCATE 4,17:PRINT CHR$(24) ;” HA 

RDCOPY-ANPASSUNG ";CHR$(24);"” in Ze 

ile 940, 1380 und 1720.” 

890 RETURN 

900 ° =====> MENUE <===-== 

910 CLS#2:PRINT#2,"  ";CHR$( 24) ;"” 

A ";CHR$( 24) ;"=Abspeichern ";CHR$L2 

4);”" H ";CHRA$(24) ;"=Hardcopy ";CHR$ 

(24);" N ";CHR$(24) ;"=Neustart ";CH 

A$(24);" W ";CHR$(24) ;"=Weiter” 

920 a$=INKEY$:IF a$="" THEN 920 

930 IF a$="a" THEN CLS#2:L0CATE#2,4 

‚„I:PAINT#2,name$;"” ";jahr$:ab$=LEF 

T$Cname$,3) : ja$=RIGHT$( jahr$,2) :zus 

atz$="-BA" :absp$=ab$+ ja$+zusatz$:5A 

VE absp$,b,49152, 16383:G0SUB 800:G0 

TO 910 

940 IF a$="h" THEN CLS#2:L0CATEA2,4 

‚I:PRINT#2,name$;” ";jahr$:| COPY:G 

DSUB 800:60T0 910 

950 IF a$="n" THEN GOSUB 800:RUN 

960 IF a$="w” THEN 990 

970 GOTO 910 

980 DATA JAN,FEB,MAR,APR,MAI, JUN, JU 

L,AUG,SEP,OKT,NOV,DEZ 

990 ° =====> LINIENGRAPHIK <===== 

1000 CLS:CLS#1:1=1:RESTORE:GOSUB 80 

0:GOSUB 680:G0SUB 280 

1010 PRINTf2,"===========> LINIEN-G 

RAPHIK <========>3(c) 65.10.86 <===" 

1020 ORIGIN 10,312:FOR i=1 TO 600 S 

TEP 4:MDOVE D,-2:DRAW i,-2:MOVE 0,0: 


DRAW i,0:NEXT 

1030 ”° =====> RASTER <===-== 

1040 ORIGIN 0,0 

1050 FOR z=1 TO 13 

1060 FOR i-1 TO 630 STEP 30 

1070 ORIGIN 10,z#24:DRAW i,OD 

1080 NEXT:NEXT 

41090 LOCATE 77,24:PRINT CHR$( 145) 
1100 FOR i=2 TO 21:L0CATE 77,25-i:P 
RINT CHR$( 149) :NEXT 

1110 LOCATE 77,3:PRINT CHR$( 240) :LO 
CATE 72,2:PRINT grenze 

1120 ORIGIN 0,0:n=0 

1130 FOR z=1 TO 13:n=n+48B 

1140 FOR i=1 TO 330 STEP 30 

1150 ORIGIN n-48, 10:DRAW 0O,i 

1160 NEXT:NEXT 

1170 ° =====> LINIEN ZEICHNEN <==== 
1180 z=-0:n=48:v=0 

1190 FOR x=1 TO 5 STEP 1 

1200 ORIGIN (n-20) -x,20-x 

1210 MOVE O,wert( 1) 

1220 FOR i=1 TO 12 

1230 DRAW (i*n)-n,wert(i) 

1240 NEXT 

1250 NEXT 

1260 FOR i=1 TO 12 

1270 TAG 

1280 v=v+1:n=n+4B 

1290 IF v<>1 THEN 1310 

1300 ORIGIN n-91,335:PRINT ein(i);: 
GOTO 1320 

1310 ORIGIN n-91,350:PRINT einl(i);: 
v- 

1320 TAGOFF 

1330 NEXT 

1340 ° =====> MENUE <=-==-== 

1350 PARINT#2,CHR$( 24) ;”" A ";CHR$C24A 


);"=Abspeichern ";CHA$(24);" H ";CH 
AR$(24) ;"=Hardcopy ";CHR$(24);” N ”; 
CHR$( 24) ;"=Neustart ";CHA$(24);" W 
";CHRA$( 24) ;"=Weiter” 

1360 a$=INKEY$:IF a$="" THEN 1360 
1370 IF a$="a"” THEN CLS#2:LOCATE#2, 
4,1:PRINT#2,name$;"” ";jahr$:ab$=LE 
FT$Cname$,3) : Ja$=-RIGHT$( Jjahr$, 2) :zu 
satz$="-LI” :absp$=ab$+ ja$+zusatz$:5 
AVE absp$,b,49152,16383:G0SUB 800:6 
OTO 1350 

1380 IF a$="h" THEN 
4,1:PRINT#2,name$;” 
G0SUB 800:60T0 1350 
1390 IF a$-"n" THEN GOSUB 800:RUN 
1400 IF a$="w” THEN 1430 

1410 GOTO 1360 


CLS#2:LOCATE#2, 
";jahr$:]| COPY: 


1420 ° =====> TORATENGRAPHIK <===== 
1430 FOR i=1 TO 12:einsum=-einsum+tei 
n(i) :NEXT 


1440 MODE 2:RESTORE 


54 


ar niet, 


LISTING 


1450 WINDOW#3,3,20,5,21 . 

1460 WINDOW#2, 13,68,2,2:PAPER#2,0:P 

EN#2,1:CL5#2 

1470 GOSUB 800:G05UB 680 

1480 PRINTf2,"===========3 TORTEN-G 

RAPHIK <===-====>3(c) 65.10.86 <===" 
GOSUB 1760 

FOR i=1 TO 12 -» 
kreis=(ein( i) #360) /einsum 
kr=kr+tkreis 

FOR ku=0 TO kreis 

x=180%#COS( kr+90) 

y=60#6IN( kr+90) 

MOVE x,y 

NEXT 

IF kr>=270 THEN 1600 

IF kr>=90 THEN DRAW x,y-8B0,0 

PLOT 0,0,1:DRAW x,y 

GOSUB 1860 

1620 ” =====> AUSGABE DER MONATE UN 

D WERTE <===== 

1630 READ a$ 

1640 LOCATE#3,2,1+i1:PRINT#3,a$;” = 
";ein(i) 

1650 NEXT:b=0 

1660 LOCATE#3,2,i+2:PAINT#3, "SUM";” 
= ":einsum 

1670 ° =====> MENUE <====-= 

1680 PAPERf2,1:PEN#2,0:CLS#2 

1690 PRINT#2," A ";CHR$(24) ;"=Absp 
eichern ";CHR$(24);" H ";CHA$( 24) ;” 
=Hardcopy ";CHR$(24);” N ";CHA$(24) 
;"=Neustart ";CHR$(24);” E ";CHA$C2 

4) ;"=ENDE " 

1700 a$=INKEY$:IF a$="" THEN 1700 
1710 IF a$="a" THEN CLS#2:LOCATE#2, 

4,1:PRINT#2,name$;"” ";Jjahr$:ab$=LE 

FT$Cname$, 3) : ja$=RIGHT$( jahr$, 2) :zu 
satz$="-T0O" :absp$=ab$+ Jja$+zusatz$:5 

AVE absp$,b,49152, 16383:G05UB 800:6 

OTO 1690 

1720 IF a$="h"” THEN 

4,1:PRINT#2,name$;” 

GOSUB 800:G0T0 1690 
1730 IF a$="n" THEN GOSUB 800:RUN 
1740 IF a$="e” THEN CALL O 

1750 GOTO 1700 

1760 DEG:ORIGIN 400,210 

1770 FOR i=0 TO 360 STEP 0.2 

1780 x1=180*CO0S( i+90) 

1790 y1=60*SIN( i+90) 

1800 PLOT x1,y1i 

1810 IF i>270 THEN 1830 

1820 IF i>9D0 THEN DRAW x1,y1:DRAW x 
1,y1-80 

1830 NEXT 

1840 PAPER#3,1:PEN#3,0:CL5#3 

1850 RETURN 

1860 ” =====> BESCHRIFTUNG MONATE 1 
-12 <z==== 


CLS#2:LOCATE#2, 
"; jahr$:1| COPY: 


1870 PRINT CHRA$( 23) +CHR$C 1); °----- 
> TRANSP.EIN <-----— 

1880 IF kr<90 THEN MOVE x-20,y+20:T 
AG:PRINT i;:TAGOFF 

1890 IF kr>90 AND kr<180 THEN MOVE 
x-10,y-95:TAG:PRINT i; :TAGOFF 

1900 IF kr=-90 THEN MOVE x-20,y+10:T 
AG:PRINT i;:TAGOFF 

4910 IF kr>18D AND kr<270 THEN MOVE 
x-20,y-105:TAG:PRINT i; :TAGOFF 
1920 IF kr=180 THEN MOVE x-20,y-105 
:TAG:PRINT i;:TAGOFF- . 
1930 IF kr>=270 THEN MOVE x+10,y+20 
:TAG:PRINT i;:TAGOFF 

1940 PRINT CHA$( 23) +CHR$(0O) ; °----- 
> TRANSP.AUS <-----— 

1950 RETURN 


WIDERSTANDS- 
CODE 


Computerfans sind im allgeimenen auch Elektronik- 
freaks und viele davon greifen zum Lötkolben, um ihre 
eigenen Schaltungen zu verwirklichen. Was aber tun, 
wenn man sich im Supersonderangebot eine Tüte 
Widerstände gekauft hat und nun überhaupt erst ein- 
mal wissen will, was man da alles erstand? Es gibt eini- 
ge Tabellen für diesen Zweck, und wer Ordnung hält 
und diese findet, der mag damit zufrieden sein. Ein 
echter User aber greift natürlich zu einem Programm 
und läßt den Computer arbeiten. Michael Tietjen ent- 
wickelte ein ebenso einfaches wie brauchbares Pro- 
gramm zur Bestimmung des Widerstandscodes. 


Programmbeschreibung: 


Mit diesem Programm kann man die Werte verschiede- 
ner Widerstände bestimmen. Zur Auswahl stehen 
Metallfilm (1%-2% Toleranz) und Kohleschichtwi- 
derstände (5%-10%-20%). Die Eingabe der Farbrin- 
ge erfolgt mit Zahlen (braun=]1, rot=2, usw.). Die To- 
leranzwerte werden auf drei Kommastellen gerundet 
ausgegeben. Weiterhin steht noch die internationale 
Farbcode-Tabelle zur Verfügung. 

Bei Kohleschichtwiderständen ist der vierte Farbring 
für die Toleranz. Hier sind nur Werte von 10 (5%), 

11 (10%) und 12 (20%) zulässig. Bei Metallfilmwider- 
ständen gilt der fünfte Farbring mit den Werten 1 (1%) 
und 2 (2%). Eine Ausgabe der Werte auf den Drucker 
ist bei diesem Programm der Einfachheit halber nicht 
vorgesehen, kann aber problemlos eingebaut werden. 
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LISTING 


To BLZ 3 2.2722 2°5° 2.22 2'222 5.5.22 2022202222202 0202 +- 1% 

20 '* WIDERSTANDSCODE # 680 PRINT" ROT 2 
30 *’# VON * 2 #210°2 = 00 
40 ’* MICHAEL TIETJEN %* +- 2% 

co ’* SCHNEIDER AKTIV %* 3 #103 = 000 
70 °%* CPC 464/664/6128 * ER 

BO RRRRRRRRRRRRS ee 700 PRINT” GELB 4 
250 MODE 2 4 #10°4 = 0000 
260 ° WINDOWDEFINITIONEN = 

270 710 PAINT” GRUEN 5 
280 WINDOW#1,1,20,5,22 5 *10°5 = 00 000 
290 WINDOW#2,22,60,5,22 = 

300 WINDOW#3,1,79,1,4 720 PRINT” BLAU 6 
310 WINDOW#4,60,79,5,22 6 #10°6 = 000 000 
320 WINDOW#5,1,79,23,25 = 5 

330 PAPER#1,1:PEN#1,0 730 PRINT” VIOLETT 7 
340 PAPER#4,1:PENF4,0 7 #10°7 = DO 000 000 
350 GOTO 1160 z 

360 740 PRINT” GRAU 8 
370 ’UNTERPROGRAMM - ABKUERZUNGEN 8 #10°8 

380 ” = 

390 CLS#1 750 PRINT” WEISS R 9 
400 PRINT#1,” SCHWARZ = 0” 9 #*210°9 

410 PRINT#1,” BRAUN = 1" 2 z 

420 PRINT#1,"” ROT .- 2" RIED AOEN zn = 
430 PRINT#1,” ORANGE = 3" 2 u. 10°-1 

440 PRINT#f1,” GELB = 4" BAR 

450 PRINT#1,” GRUEN - 5" 770 PRINT en ua = = 
460 PRINT#1,"” BLAU = 6" - = 

470 PRINT#1,"” VIOLETT = 7" +- 10% 

A480 PRINTf1," GRAU = 8" 780 PRINT” OHNE FARBE - 
490 PRINT#1,"” WEISS = 9,“ Se - 

500 PRINT#1,"” GOLD = 10 " +- 20% 

510 PRINT#1,” SILBER = 11" 790 PLOT 1,360:DRAW 630,360 
520 PRINT#1," 0o.ANGABE = 12 " 800 PLOT 1,330:DRAW 630,330 
530 PRINT#1 810 PLOT 1,100:DRAW 1,360 

540 PRINT#1," TOLERANZEN “ 820 PLOT 120, 100:DRAW 120,360 
S50 PRINT#1, "GOLD ( 10)= 5%" 830 PLOT 220, 100:DRAW 220,360 
560 PRINT#1,"SILBER (11)=10%" 840 PLOT 320, 100:DRAW 320,360 
570 PRINT#1,”o.ANGABE( 12) =20%"” 850 PLOT 500, 100:DRAW 500, 360 
580 RETURN 860 PLOT 630, 100:DRAW 630,360 
590 °’ 870 PLOT 1,100:DRAAW 630, 100 
600 ’UNTERPROGRAMM-TABELLE f. FARBC 880 PRINT:PRINTBE ISPIEL 
ODE 890 PRINT"--------------- 

610 900 PLOT 220,80:DRAW 320,80 
620 CLS 910 DRAW 320,50 

630 PRINT” INTERNATI 920 DRAW 220,50 

ONALER FARBCODE FUER WIDERSTAENDE 930 DRAW 220,80 


940 PLOT 230,80:DRAW 230,50 
---------------------------- 950 PLOT 234,80:DRAW 234,50 
nn 960 PLOT 276,80:DRAW 276,50 


640 PRINT 970 PLOT 244,80:DRAW 244,50 
650 PRINT” BEDEUTUNG 1.ZIFFER 980 PLOT 248,80:DRAW 248,50 
2.ZIFFER ZAHL DER NULLEN 990 PLOT 258,80:DRAW 258,50 
TOLERANZ 1000 PLOT 262,80:DRAW 262,50 
660 PRINT:PRINT” SCHWARZ 0 1010 PLOT 272,80:DRAW 272,50 
0 0 1020 PLOT 220,65:DRAW 170,65 
670 PRINT” BRAUN 1 1030 PLOT 320,65:DRAW 370,65 
1 #10°1 = 0 1040 LOCATE 29,23:PRINT"1 234 
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LISTING 


LOCATE 49,20:PRINT”1-GELB 
LOCATE 49,21:PARINT"2=-VIOLETT 
LOCATE 49,22:PRINT"”3-ROT 

1080 LOCATE 49,23:PAINT"”4=5ILBER 
1090 LOCATE 59,22:PRINT"- 4700 OHM 
= 4,7 KOHM 


1050 
1060 
1070 


1100 PRINT:PRINT:PRINT” 
WEITER MIT < TASTE > 
1110 PLOT 1,20:DRAW 630,20 
1120 CALL &BB06:60T0 1370 
1130 
1140 ’EINLEITUNG UND MENUE 
1150 
1160 CLS 
1170 LOCATE 1,1:PRINT STAING$(80,"* 
") 
1180 PRINT” 


EINLEITUNG 
1190 PRINT" 


1200 PRINT:PRINT 
1210 PRINT" SIE KOENNEN ZWISC 


HEN ZWEI ARTEN DER WIDERSTANDSBESTI 
MMUNG WAEHLEN. 


1220 PRINT 

1230 PRINT" 1.METALLFILMWIDER 
STAND 2.KOHLESCH 
ICHTWIDERSTAND 

1240 PRINT 


1250 PRINT" SIE UNTERSCHEIDEN 
SICH ZWISCHEN DER ANZAHL DER FAR 
BAINGE UND DER 


1260 PRINT 
1270 PRINT” TOLERANZWERTE.WEI 


TER STEHT IHNEN EINE TABELLE DER I 
NTERNATIONALEN 
1280 PRINT 
1290 PRINT” FARBCODE FUER WI 
DERSTAENDE BEREIT.DIE TOLERANZWERT 
E WERDEN AUF 3 
1300 PRINT 
1310 PRINT” 
GERUNDET. 
1320 PRINT:PRINT:PRINT 
1330 PRINT” 

WEITER MIT < TASTE > 
1340 PRINT” 


LOCATE 1,24:PRINT STAING$( 80,” 


NACHKOMMASTELLEN 


CALL &BBO06 
CLS 

LOCATE 24,3:PRINT”* METALLFILM 
WIDERSTAND (ı) * 

1390 LOCATE 24,6:PRINT"* KOHLESCHIC 
HTWIDERSTAND ( 2) * 

1400 LOCATE 24,9:PRINT"* TABELLE FU 
ER FARBCODE ( 3) * 

1410 LOCATE 24,12:PRINT”* ZURUECK Z 
UR EINLEITUNG ( 4 ) * 


1420 LOCATE 24,14: 

1430 LOCATE 29, 18:PRINT”#* IHRE WAHL 
(1/2/3/4) * 

1440 A$=INKEY$:IF A$<”"1” OR A$>"4" 
THEN 1430 

1450 ON VAL(A$) GOTO 1490,2240,620, 
350 

1460 ” 

1470 ’BERECHNUNG 
1480 ° 

1490 CLS:CLS#2:CL5#3:CL5#5 

1500 GOSUB 390 

1510 PRINT#3," M 
ETALLFILMWIDERSTAND( 1% oder 2% TOLE 

RANZ) 

1520 PRINT#3,” = 


METALLFILM 


1530 
1540 
1550 
1560 
1570 
1580 
1590 
1600 
1610 


PRINT#3,STRING$( 79," _") 
PRINT#2,"IHRE EINGABEN BITTE: 
PRINTf2,"” 
PRINT#2 
PRINT#2,"1.FARBRING " 
PRINT#2,"2.FARBRING " 
PRINT#2,"3.FARBRING " 
} 
[} 


PRINT#2,”4. FARBRING 

PRINT#2,”5.FARBRING 
1620 LOCATE 34,8: INPUT": 
1630 IF E >9 THEN LOCATE 
STAING$( 20,32) :GOTO 1620 
1640 LOCATE 34,9:INPUT": "”,Z 

1650 IF Z >9 THEN LOCATE 34,9:PRINT 
STAING$( 20,32) :G0OTO 1640 

1660 LOCATE 34,10:INPUT”: ”,D 

1670 IF D >9 THEN LOCATE 34, 10:PRIN 
T STAING$( 20,32) :GOTO 1660 

1680 LOCATE 34, 11:INPUT": ”,V 

1690 IF V>11 THEN LOCATE 34, 11:PRIN 

T STAING$( 20,32) :GOTO 1680 

1700 LOCATE 34, 12:INPUT”: ”,F 

1710 IF F<1 OR F>2 THEN LOCATE 34,1 

2:PAINT STRING$( 20,32) :G0TO 1700 
1720 WW=E#100+Z#10+D#1 

1730 WE=WW#1O"V 

1740 IF V=10 THEN WE=(E#100+Z#10+D* 
1)*10°-1 

1750 IF V=11 THEN WE=(E#100+Z#10+D* 
1)*10°-2 

1760 PRINT#2:PRINT#2 

1770 PRINT#2,”DER WIDERSTAND HAT "U 

SING" AHHHHH AHA OHM” ;WE 

1780 PRINT#2 


‚E 
34,8: PRINT 


1790 PRINT#2," ="U 
SING" AHHHHH HA KOHM” ;WE/ 1000 

1800 PAINT#2 

1810 PRINT#2," -"y 


SING" AHHHHH. HAH MOHM” ;WE/ 1000/1000 
1820 ” 

1830 BERECHNUNG TOLERANZ 

1840 ” 
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LISTING 


1850 CLSf4 
1860 PRINT#A 
1870 PRINTfA,” 
1850 PRINT#4,” 
1890 PRINT#4 
1900 IF F=2 THEN 2040 

1910 PRINT#4,” MIT +1% TOLERANZ 


TOLERANZWERTE 


1830 ERINTÄA Using araHeR HR om“ 
;WE/100*101 

1940 PRINT#4 , USING" AHRHHHH HAHN KOHM” 
;WE/1000/ 100#101 


1950 PRINT#4,USING"AHRHHHH. HAM MOHM” 
;wE/ 1000/ 1000/ 100*101 

1960 PRINT#4,56TRING$(20,”_”) 

1970 PRINT#A 

1980 PRINT#4,” MIT -1% TOLERANZ 
1990 PRINT#4,"” 
2000 PRINT#4,USING"AHHRHH. HAM OHM” 
;WE/100*99 

2010 PRINT#4, USING" AHHHHR.AAH KOHM” 
;wE/ 1000/ 100*99 

2020 PRINT#4,USING"AHHHHH AHA MOHM” 
;WwE/ 1000/ 1000/ 100*99 

2030 GOTO 2170 

2040 PRINT#4,” MIT +2% TOLERANZ 
2050 PRINT£4A,” 
2060 PRINT#4,USING"AHHHHH HAM OHM" 
;WE/100*102 

2070 PRINT#4, USING" HHHHHH AAN KOHM" 
- WE/ 1000/ 100*102 

2080 PRINT#4 USING" AAHRHH HAHN MOHN“ 
; WE/ 1000/ 1000/ 100#102 

2090 PRINT#4,STAING$(20,"_”) 

2100 PRINT#£A 

2110 PRINT$4," MIT -2% TOLERANZ 
2120 PRINT#4,"” 
2130 PRINT#4 ‚USING HRRRRH HUN OHM" 


;WE/100*98 

2140 PRINT#4,USING" AHHRHA HH KOHM“ 
;WE/1000/ 100*98 

2150 PRINT#4, USING” AAAHHH AA MOHM”" 
;WE/ 1000/ 1000/ 100*98 

2160 

2170 PRINT#5,STRING$( 79," _”) 

2180 PRINT#5,"” NOCH EINE EIN 
GABE (J/N)? < ENTER > = MENU 
E 


2190 A$=INKEY$:IF A$="" THEN 2190 
2200 IF A$="J3" OR A$="3j" THEN CLS#2 
.CLöFA: CLS#5:G60TO 1540 ELSE 1370 
2210 
2220 
2230 

2240 CLS:CLS#2:CL54#3:CL5#5 

2250 GOSUB 390 

2260 PRINT#3,” . KOHLESC 
HICHTWIDERSTAND( 5%, 10% oder 20% TOL 
ERANZ) 

2270 PRINT#3,” 


"BERECHNUNG KOHLESCHICHT 
[ 


2280 PRINT#3,STRING$( 79,"_”) 

2290 PRINT#2,"IHRE EINGABE BITTE: 
2300 PRINT#2,"------------------- 
2310 PRINT#2 

2320 PRINT#2,”"1.FARBRING ” 

2330 PRINT#2,"2.FARBAING 

2340 PRINT#2,"3.FARBRING ” 

2350 PRINT#2,"4.FARBRING ” 

2360 LOCATE 34,8:INPUT”: ",E 

2370 IF E>9 THEN LOCATE 34, 8:PRINT 
STAING$( 20,32) :60TO 2360 

2380 LOCATE 34,9:INPUT": ",Z 

2390 IF Z>9 THEN LOCATE 34,9:PRINT 
STAING$( 20,32) :G0TO 2380 

2400 LOCATE 34,10:INPUT": ”,D 

2410 IF D>11 THEN LOCATE 34, 10:PRIN 
T STRING$( 20,32) :G0TO 2400 

2420 LOCATE 34,11:INPUT": ”,V 

2430 IF V<10 OA V>12 THEN LOCATE 34 
‚11:PRINT STAING$( 20,32) :G0TO 2420 
2440 WW=E#10+Z#1 

2450 WE=WW*#10°D 

2460 IF D=10 THEN WE=(E*#10+Z*1)*10* 
-1 
2470 
-2 
2480 PRINT#2:PRINT#2 

2490 PRINT#2,"DER WIDERSTAND HAT "U 
SING" AHHHHH. BHR OHM" ;WE 

2500 PRINT#2 

2510 PRINT#2,"” 

SING HHHRR  HR KOHM” ;WE/ 1000 
2520 PRINT#2 

2530 PRINT#2," ="y 
SING" HHHHHH. HHH MOHM” ;WE/ 1000/1000 


IF D=11 THEN WE=(E#10+Z#1) #10* 


z"y 


2540 
2550 ’BERECHNUNG-TOLERANZ( -5%/ +-10% 
I+- 20%) 

2560 

2570 CLS#A 
2580 PRINTfA 
2590 PRINT#4," 
2600 PRINT#A," 
2610 PRINT#A 
2620 IF V=11 THEN 2770 

2630 IF V=12 THEN 2900 

2640 PRINT#4,” MIT +5% TOLERANZ 
2650 PRINT#4,"” 
2660 PRINT#4,USING"AHHHHH .HHH OHM" 
;WE/100%#105 

2670 PRINT#4,USING" AHHHHH. HH KOHM” 
;WE/ 1000/ 100*105 

2680 PRINT#4,USING"AHAHHR HAH MOHM” 
;WE/ 1000/ 1000/ 100*105 

2690 PRINT#4,STRING$(20,"”_”) 

2700 PRINT#4 

2710 PRINT#4,"” MIT -5% TOLERANZ 


TOLERANZWERTE 


en 
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Rn iss we 


LISTING 


2720 PRINT#4,"” 
2730 PRINT#4,USING"AHHHHH AHA OHM” 
;wE/100*95 

2740 PRINT#4,USING"AHRHHHH AHH KOHM” 
;wE/ 1000/ 100*95 

2750 PRINT#A, USING" ARARHR. HAH MOHM" 
- WE/ 1000/ 1000/ 100*95 


60 GOTO_3030 
5358 PRINT#4," MIT +10% TOLERANZ 


2780 PRINTf4A," 

2790 PAINT#4 , USING" HRHHHR HHH OHM” 
;WE/100*#110 

2800 PRINT#4, USING" AHAHHR  HHH KOHM” 
;WE/1000/ 100*110 

2810 PRINT#4,USING" AHAHHH AHA MOHM” 
;WE/1000/ 1000/ 100*110 

2820 PRINT#4,5TRING$(20,"”_”) 

2830 PRINT#A 

2840 PRINT#4," MIT -10% TOLERANZ 
2850 PRINT#f4A," 
2860 PRINT#4,USING"AHHHHH .HAH OHM" 
;WE/100*90 

2870 PRINT#4,USING"AHAHHHH .HHH KOHM” 
;WE/ 1000/ 100*90 

2880 PRINT£4,USING" AHHHHH HHH MOHM” 
;WE/ 1000/ 1000/ 100*90 

2890 GOTO 3030 

2900 PRINT#4,” MIT +20% TOLERANZ 
2910 PRINT#4,"” 
2920 PAINT#4,USING"AHHHHH HH OHM" 
;WE/100*120 

2930 PRINT#A, USING" AHHHHH.HAH KOHM” 
;WE/1000/ 100*120 

2940 PRINT#4,USING" AAHHHH .AHR MOHM” 
-WE/ 1000/ 1000/ 100*120 

2950 PRINTf4,STAING$(20,"”_”) 

2960 PRINT#A 

2970 PRINT#4," MIT -20% TOLERANZ 
2980 PRINTfA," 
2990 PRINT#A,USING"AHHHHR .BAH OHM” 
;WE/100*80 

3000 PRINT#4,USING"AAHHHH. AHA KOHM” 
;WE/1000/ 100*80 

3010 PRINT#4,USING"HAHHHH HHH MOHM” 
; WE/ 1000/ 1000/ 100*80 

3020 

3030 PRINT#5,5TRING$( 79,"_”) 

3040 PRINT#S,"” NOCH EINE EIN 

GABE (J/N)? < ENTER >= MENU 
E 


3050 A$=INKEY$:IF A$="" THEN 3050 
3060 IF A$="J3" OR A$="3j" THEN CLS#2 
:CLS#4:CL5#5:G0T0 2290 ELSE 1370 


TAPE- 
TIME 


Musikfans, die mit einem Kassettenrekorder arbeiten, 
werden sich schon oft geärgert haben, wenn das Band 
mitten in einer Aufnahme zu Ende geht. Das Zähl- 
werk nutzt da gar nichts, denn durch die unterschied- 
lichen Spulengrößen ergibt sich eine schwer abzu- 
schätzende Restzeit. Autor Andreas Uhl entwickelte 
hierfür ein Listing, welches aus dem einmal justierten 
Zählwerk die exakte Zeit berechnet, in der das Band 
noch zu bespielen ist. 


Programmbeschreibung: 


Das Programm “Tape-Time“ ermittelt anhand eines 
beliebigen Zählwerkstandes sowohl die schon abgelau- 
fene als auch die noch verbleibende Restzeit einer 
Musikkassette. Dies ist vor allem dann von Nutzen, 
wenn die Aufnahmezeit der Kassette zu Ende geht 
und man sich fragt, ob noch ein Lied auf die Kassette 
alst. 
it diesem Programm ist esnun möglich, für jeden 
Kassettenrekorder eine Liste der Zählwerkstände und 
der dazugehörigen Restzeit zu erstellen. Dazu benö- 
tigt das Programm lediglich die Angabe der Kassetten- 
länge und zwei Meßwerte, die wie folgt ermittelt wer- 
den müssen: 
. Kassette zurückspulen 
. Zählwerkstand auf Null stellen 
. Kassette starten “Play‘ 
. Zählwerkstand nach genau 10 Minuten Spielzeit 
notieren 
.nach weiteren 10 Minuten (insgesamt 20 Minuten) 
wieder den Zählwerkstand notieren 
6. Kassettenlänge notieren (z.B. 60, 90 oder 120) 
Diese Justierung muß für einen Kassettentyp natür- 
lich nur einmal gemacht werden, nimmt also nicht so- 
viel Zeit und Mühe in Anspruch, wie man nach dem 
eben Gelesenen denkt. 


PWUV- 


an 


Programmbedienung: 


Nach dem Start von “Tape-Time“ sollten erst einmal 
die Meßwerte unter Menüpunkt 4 eingegeben werden. 
Danach kann man sich eine Liste auf den Drucker 
oder auf den Bildschirm ausgeben lassen. Da das Pro- 
gramm mit dem Anwender im Dialog arbeitet, dürf- 
ten weiter keine großen Probleme auftreten. 

Es sei jedoch noch einmal darauf hingewiesen, daß die 
ermittelten Werte nur für eine Kassettenlänge 'zutref- 
fen. Unterschiedliche Spulengrößen können nicht ein- 
fach aufgerechnet werden. 
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LISTING 


10 GREEN 
20 '* TAPE-TIME * 
30 °* VON * 
240 '* ANDREAS UHL % 
50 '* FUER # 
60 '* SCHNEIDER AKTIV = 
70 '* CPC 464/664/6128 # 
80 CREATE EISEN III IE 
100 ’### TITELBILD “nr 
110 MODE 2 


120 LOCATE 32,3:PRINT’TTAPE-TI 
ME” 

130 LOCATE 35,5:PRINT"”(c) 1986 by" 

140 LOCATE 35,6:PRINT"Andreas Uhl” 

150 ORIGIN 1,1:DEG:GDOTO 180 

160 k=4 

170 FOR grad=-1 TO 360 STEP k:PLOT r 

#C0S( grad) ‚r#S5IN( grad) :NEXT grad:OR 

IGIN 1,1:RETURN 

180 PLOT 170, 110:DRAW 170, 

W 460, 270:DRAW 460, 110 
190 PLOT 220, 110:DRAW 230, 150:PLO 

T 410, 110:DRAW 400, 150:DRAW 230, 
150:PLOT 170,110:DRAW 460, 110 

200 ORIGIN 290, 188:DRAWR 52,0:DRAWR 
0,20:DAAWR -52, 0:DRAWR 0,-20 

210 r=16:0RIGIN 250, 198:G0SUB 160:r 
=16:0RIGIN 380, 198: GOSUB 160 

220 ORIGIN 248, 121:r=5:k=10:605SUB 1 
70:O0RIGIN 382, 121: r=5:60SUB 170:0RI 

GIN 295, 125: r=6: G0OSUB 170:0RIGIN 35 

5,125: r=6: GOSUB 170 

230 INK 1,26,3:FOR T=1 TO 2000:NEXT 
:INK 1, 26 

240 LOCATE 27,24:PRINT"Taste drueck 

en ... 

250 CALL 6BB18:60T0 370 

260 ° 

270 #08 

#8 

280 ° 

290 CLS:LOCATE 3,3:PARINT"Bitte gebe 

n Sie nun Ihre Messwerte ein !” 

300 LOCATE 3,5:INPUT "Zaehlwerkstan 

d nach 10 Minuten : "”,x 

310 LOCATE 3,7:INPUT "Zaehlwerkstan 

d nach 20 Minuten : ",y 

320 IF y<=x THEN PRINT CHR$C7);"” FA 

LSCHE EINGABE”:FOR t=1 TO 2000:NEXT 

:GOTO 290 

330 LOCATE 3,9:INPUT "Laenge der Ka 


270:DRA 


WERTE EINGEBEN * 


ssette (60,90 o.a.) :"”,c 

340 

350 ’### MENUE * 
#r 

360 


370 CLS:LOCATE 33,3:PRINT CHA$( 24)” 
MEN U E "CHR$(24) 
380 LOCATE 26,6:PRINT"1I 

Wert berechnen” 


---> Einen 


60 


390 LOCATE 26,8:PRINT"2 ---> Tabell 
e auf Bildschirm” 

400 LOCATE 26, 10:PRINT"3 ---> Tabel 
le auf Drucker” 

410 LOCATE 26, 12:PRINT"4 ---> Neue 
Messwerte eingeben" 

420 LOCATE 26,20:PRINT"Bitte waehle 
n Sie ...."” 

430 z$=INKEY$:IF z$=""THEN 430 

440 IF z$<>"1"AND z$<>"2"AND z$<>"3 
"AND z$<>"A"THEN 430 


450 IF z$="2"THEN druck=2:G0OTO 620 

460 IF z$="3"THEN druck=8:60T0 640 

470 IF z$="A"THEN 260 

a0 ° 

490 '%*## EINEN WERT BERECHNEN ##% 

500 ° 

510 CLS: LOCATE 26,3:PRINT CHR$C 24) " 
Einen Wert berschnen "CHR$C2 

4) 

520 LOCATE 20,6:INPUT"Bitte den Zae 


hlwerksstand eingeben : "”,z 
530 GOSUB 830 


540 CLS:LOCATE 25,5:PRINT"Kassetten 


type : C”;c 
550 LOCATE 25,7:PRINT"Zaehlwerkstan 
d: ";z 


560 LOCATE 25,9:PRINT"Spielzeit 
© ";:PRINT USING"##";tb; :PRINT” 

min. ” ;:PRINT USING"”#4#";t; :PRINT 
sec." 

570 LOCATE 25, 11:PRINT"Restspielzei 

t : ";z:PRINT USING”##”;rtb; :PRINT 

" min. ";:PRINT USING”#4#4”;rt; :PRI 

NT" sec." 

580 LOCATE 27,23:PRINT"Weiter mit T 

astendruck":CALL &BB18:G0T0 370 

590 

600 ’**# Tabelle SOWOHL auf DRUCKER 
als auch auf Bildschirm ### 

610 

620 CLS:LOCATE 23,3:PRINT CHA$(24)” 
Tabelle auf Bildschirm "CHR$( 24) 

630 GOTO 650 

640 CLS:LOCATE 25,3:PRINT CHRA$( 24)” 
Tabelle auf Drucker "CHR$( 24) 

650 LOCATE 2,7:INPUT"Bis zu welchem 
Zaehlwerkstand soll die Liste gehe 

n : ”,n 

660 LOCATE 2,9:INPUT"Welche Zaehlwe 

rkschrittweite wird gewuenscht (z.B 

5)3.°,D 

670 IF druck=B THEN PRINT#8," Zaehl 


werkstand Zeit 
Restzeit Kassettentype: C";c: 
60T0 710 


680 WINDOW #1,1,80,1,1:PAPER #1,1:P 
EN#1,0:CL5#1:PRINT#1,” Zaehlwerksta 
nd Zeit Restze 
it Kassettentype: C”;c 


LISTING 


WINDOW #2,1,80,3,24:CL5#2 

m=1 

FOR z=0 TO n STEP p 

m=m+ 1 

GOSUB 830 

IF druck=8B THEN 760 

750 IF m=20 THEN PRINT CHR$(7) :LOCA 
TE 27,23:PRINT"Weiter mit Tastendru 
ck":CÄLL EBB18:CL542:m=1 

760 PRINT#druck ‚USING" AHH#”;z;:PR 
INT#druck ,‚SPACE$( 12); 

770 PRINT#druck ‚USING"”###” ;tb; :PARIN 
T#druck," min. "; 

780 PRINT#druck ‚USING”##” ;t; :PRINT# 
druck,” sec. ve. 

790 PRINT#druck ‚USING” #44"; rtb; :PRI 
NT#druck,” min. "”; 

800 PRINT#druck ,‚USING"”##"; rt; :PRINT 
#druck,” sec." 

810 NEXT 

820 LOCATE 27,23:PRINT"Weiter mit T 
astendruck":CALL &BB18:m=1:G0T0O 370 
830 a=(( 10#*y-20%*x) /L[x-y)*x*y)) 

840 b=((20-y“2*a) /y) 

850 t=(z*’2*a) +(z*b) 

860 tb=INT( t) :tc=t-tb:t=INT( tc*60) 
870 IF t=0 THEN rtb=c/2-tb:rt=0:60T 
DO 890 

880 rtb=c/2-tb-1:rt=60-t 

890 RETURN 


DAS SUPER ANGEBOT! 


Unser Kassetten-Service räumt sein Lager! 
Wir bieten an: Bunte Programm-Mischung, beste- 
hend aus drei oder fünf Kassetten unterschiedlichen 
Inhalts mit Spielen, Utilities, Anwender-Program- 
men. Nur solange Vorrat reicht. Zu Super-Preisen: 
Das Dreier-Paket für sage und schreibe DM 30, 
das Fünferpaket für ganze 40 DM! Keine Rück- 
nahme, keine Wunschzusammenstellung! 
Benutzen Sie unseren Bestell-Coupon im Innern des 
Heftes, einfach ankreuzen, Geld, Scheck beifügen 
oder Bankabbuchung. Ist die Ware vergriffen, 
wird der Scheck nicht eingelöst, beiligendes 
Bargeld zurückerstattet. 
Benutzen Sie unseren Programm-Coupon 
auf Seite 49! 


Verkaufe ÖPC 6128, Drucker 


DMP-2000, Software 10 Disk. 


(Wordstar, COBOL-Compiler, 

Turbo-Pascal u.a.): 1.300 

DM, Franz Czopik, IImweg 8, 

33 Braunschweig, 

Tel. 0531/860774 
TOPGAMES 

für CPC 664 u. CPC 6128. 

7 Spiele auf einer Disk. für 

nur 22 DM (z.B. Raffles, 

Aurion 2, Tnnis). Info: 

Kay Schwettmann, Steuben- 

str. 6, 4990 Lübbecke, 

Tel. 05741/1686 


Wer schreibt mir ein Pro- 
gramm f. CPC 646, ein spe- 
zielles u. schwieriges, egal, 
ob Basic od. Sonst., m. 
Druckerausgabe u. Disk. 
Näheres b. Kontakt, zahle 
gut f. das Programm. George 
Urbing, 5rte Volmerange, 
L-3593 Dudelange 
664-Besitzer sucht Anschluß 
an CPC-Club im Raum Mainz, 


Wiesbaden, Ingelheim, Bingen. 


Friedrich Schmitz, Am Ju- 
denfriedhof 10, 6501 Heides- 
heim, Tel. 06132/5472 


DIE TÜRME 
VON HANOILI 


Dieses Strategiespiel kann man schon als Klassiker be- 
zeichnen. Es existiert fast für jeden Computer und soll- 
te in keiner Programmsammlung fehlen. Eine beson- 
ders gute Version des Denkspieles, welches wir unse- 
ren Lesern mit gutem Gewissen empfehlen können, 
kommt vom Schneider aktiv-Autor Michael Köthe. 


Spielregeln: 
Umrangieren von Fertigbauteilen 


Der Sinn des Spieles besteht darin, sämtliche Steine 
von der mittleren, auf eine durch den Spieler vorher zu 
bestimmende, andere Stangen anzuordnen. Dies hört 
sch leichter an als getan, denn die Steine sind unter- 
schiedlich groß und es können immer nur die kleine- 
ren auf die größeren Steine gepackt werden. Die Zahl 
der Bauteile kann zwischen drei und zehn beliebig 
gewählt werden, Anfänger sollten erst mit drei begin- 
nen. Dann kann man sich immer noch steigern. Der 
CPC gibt dabei aber noch die Zahl der Minimum-Züge 
an. Wer es dann schafft, mit diesen Mindest-Zügen 
auszukommen, der kann sich als Hanoi-Meister fühlen. 
Natürlich gibt es auch eine Strategie, die, wenn sie 
konsequent angewandt wird, den schnellsten Erfolg 
bringt. Aber so etwas herauszufinden ist ja das halbe 
Rätsel, weshalb nichts davon verraten sein soll. Viel 
Spaß beim Spielen! 

(JE) 


LISTING 


h | CEREIIEIESEIEIESESEIESESESE SEES IE SEIEN IE IE IE IE IE SE 

2 TUERME VON HANOI * 

3 '* VON ” 
a * MICHAEL KOETHE * 

5 1# FUER * 

6 + SCHNEIDER AKTIV * 

ya CPC 464/664/6128 * 

8 ’ RR TE EEE EEE NEE TENENE 

10 MODE ‘1 

20 GOSUB 920 

30 INK 3,3:INK 2,18:INK 0,0:BORDER 

) 

40 DIM hn( 3,10) 

45 GOSUB 1040 

50 MODE 1 

60 WINDOW#1,2,39,1,3:PAPER$1,1:CL5# 
1:PENf1,3 


70 LOCATE#1,4,2:PRINT#1,"TUERM 
E voN HA N 0 I":PEN#1,0 
80 LOCATE 2,17:PRINT STRING$( 38,208 


) 

90 FOR i=-6 TO 16 

100 FOR x=8B TO 32 STEP 12 

110 LOCATE x,i:PRINT CHR$( 149) 
120 -NEXT x,i 

130 LOCATE 9,19:PRINT"Wieviele Stei 
ne (3-10)" 

140 LOCATE 18,20:PRINT"O = 10” 

150 h$=INKEY$:IF h$=""” THEN 150 

460 IF h$="0" THEN anz=10:60T0 180 
170 anz=ASC(h$)-48:IF anz<3 OR anz> 
9 THEN 150° 

180 IF anz=0O THEN anz=10 

490 LOCATE 1,19:PRINT SPACE$( 80); 
200 GOSUB 730 

210 LOCATE 2,22:PRINT"Wo sollen die 
Steine aufgebaut werden" 

220 h$=INKEY$ 

230 IF h$="1" OR h$="3" THEN 250 

240 GOTO 220 

250 ziel=VAL(h$) 

260 PEN 2 

270 LOCATE 2,22:PRINT SPACE$( 39); 

280 LOCATE 1,5:PAINT ziel$ 

290 LOCATE 1,15:PRINT USING”#"; ziel 

300 FOR i=1 TO anz 

310 zanz=zanz*#2+]1 

320 NEXT 

330 LOCATE 24,23:PARINT"M’Zugzahl:”; 

USING" AHHHH” ; zanz 

340 LOCATE 30,24:PRINT"Zug:"” 

350 PEN 1 

360 ” 
370 

380 

390 

400 

410 
420 

430 


‘ Spiel 


LOCATE 2,23:PRINT” fe 
LOCATE 2,24:PRINT” = 
LOCATE 2,23:PRINT"VON:” 
h$=INKEY$:IF h$="" THEN 420 
zi=VAL(h$) :IF zi<i OR z1>3 THEN 


420 
440 
)=0 
450 
460 
470 
480 

420 
490 IF z2=z1 THEN 390 
500 IF hn( z2,zeig( z2))<hn( z1,zeig(z 
1)) AND zeig( z2)<>DO THEN PRINT CHR$ 
(7) ;:60T0O 390 
510 GOSUB 57Q 
520 IF hn(ziel,anz)=1 THEN 1400 
530 GOTO 390 
540 
550 ”° Zuege setzen 
560 
570 PEN 2:zeig( z2)=zeig( z2) +1 
580 hn( z2,zeig( z2))=hn( z1,zeig( z1)) 
590 LOCATE posi( z1)-INTChn(z1,zeig( 
z1))/2),17-zeig( z1) 

600 PRINT SPACE$( leer( hn( z1,zeig( z1 
I); i 
610 LOCATE posi(z1),17-zeig( z1) :PEN 

1:PRINT CHRA${ 149) :PEN 2 
620 hn( z1,zeig( z1))=0 
zeig( z1)=-zeig( 21) -1 
PRINT CHR$( 22) CHR$C 1) 

LOCATE posi( z2) , 17-zeig( z2) 
PRINT hn$C hn( z2,zeig( z2))) 
PRINT CHR$( 22) CHR$( 0) 

680 zug=-zug+1:LDOCATE 34,24:PRINT US 
ING" AHHHH” ; zug; :PEN 1 

690 RETURN 

700 

710 * Aufbau Grundstellung 
720 

730 t=anz 

PEN 2 

PRINT CHR$[ 22) CHA$( 1) 


IF hn(z1,zeig(z1))=O OR zeig(z1 
THEN PRINT CHA$(7) ;:GOTO 420 
LOCATE 7,23:PRINT z1 

LOCATE 2,24:PRINT"”NACH: " 
h$=INKEY$:IF h$="" THEN 470 
z2=VAL(h$) :IF z2<1 OR z2>3 THEN 


760 FOR i=1 TO 10 

770 hn(2,i)=t 

780 LOCATE 20, 17-i:PRINT hn$(t) 
790 t=t-1 

800 IF t<O THEN t=0 

810 NEXT. i 


DIM zeig(3),posi(3) 

zeig( 1)-0:zeig(2)=anz:zeig( 3) =0O 

posi( 1)=8:posi( 2) =20:posi( 3) =32 

PRINT CHRA$( 22) CHR$(O) 

LOCATE 8, 18:PARINT"”1 2 
3* 

PEN 1 

RETURN 

890 

’ Erklaerung 

910 

920 LOCATE 5,2:PRAINT'TTUERME 

voN HA NO I” 


62 


LISTING 


930 LOCATE 1,8:PRINT” Ziel des Sp 
iels ist es, saemtliche Steine 
von der mittleren Stange a 
uf eine vorher angegebene Stange 
zu packen.” 


940 PRINT" Dabei ist es nicht moe 
glich, einen grossen Stein auf 
einem kleinen zu plazieren. 
Gespielt werden kann mit 3 - 

10 Steinen." 
950 PRINT" Die Mindestzuganzahl 
wird angege- ben.” 
960 PRINT” Gezogen wird durch Ein 
gabe der je- weiligen Ziffer 


der Stangen auf dem Zehnerbl 
ock"” 

970 PRINT" 
rsten Stange 
smal eingeben.” 

990 LOCATE 15,25:PRINT">>TASTE<<"” 
1000 CALL &BB18:RETURN 

1010 

1020 ° Zuweisungen 

1030 

1040 SYMBOL 
0 

1050 SYMBOL 
‚240,224,0 
1060 SYMBOL 
‚255,255,0 
1070 SYMBOL 
‚255, 126,0 
1080 SYMBOL 
‚255, 127,0 
1090 SYMBOL 
‚255,254,0 
1100 DIM hn$( 10) ,leer( 10) 

1110 FOR i=1 TO 10 

1120 READ v 

1130 IF v=-1 THEN 1160 

1140 hn$( i)=hn$( i) +CHA$(v) 

1150 GOTO 1120 

1160 NEXT i 

1170 FOR i=1 TO 10 

1180 READ a 

1190 leer(i)=a 

1200 NEXT 

1210 z$="ZIELFELD” 

1220 FOR i=1 TO 8 

1230 ziel$=-ziel$+MID$( z$,i, 1) +CHA 
$( 10) +CHR$( 8) 

1240 NEXT 

1250 RETUAN 

1260 DATA 243, -1 

1270 DATA 8,240,242,241,-1 

1280 DATA 8,244,242,245,-1 

1290 DATA 8,8,240,242,242,242,241,- 
1 
1300 
1 


Bei Fehleingabe der e 
Stange ein zweite 


240,7,15,15, 15,15, 15,7, 
241,224,240,240,240,240 
242,255,255,255, 255,255 
243, 126,255,255,255, 255 
244 ,127,255,255,255, 255 
245,254,255,255,255,255 


DATA 8,8,244,242,242,242,245,- 


1310 DATA 8,8,8,240,242,242,242,242 
‚242,241,-1 

1320 DATA 8,8,8,244,242,242,242,242 
‚242,245,-1 

1330 DATA 8,8,8,8,240,242,242,242,2 
42,242,242,242,241,-1 

1340 DATA 8,8,8,8,244,242,242,242,2 
42,242,242,242,245,-1 

1350 DATA 8,8,8,8,8,240,242,242,242 
‚242,242,242,242,242,242,241,-1 


1360 DATA 1,3,3,5,5,7,7,9,9, 11 

1370 ° 2 

1380 ° Ende 

1390 

1400 WINDOW 1,40,20,25:CLS 

1410 PRINT"benoetigte Zuege:";zug 
1420 PRINT"moegliche Mindestzugzahl 
:";zanz 


1430 PRINT:PRINT"Noch einmal (J/N)” 
1440 h$=INKEY$:IF h$="" THEN 1440 
41450 IF UPPER$(h$)="J"” THEN RUN 30 
1460 MODE 2:END 


ALTDEUTSCHE 
SCHRIFT 


Es gibt bei einem Matrixdrucker nur wenige Möglich- 
keiten, einen,Textteil besonders hervorzuheben. Die 
meisten Geräte begnügen sich mit Unterstreichungen, 
Schrägschrift oder vergrößerten Buchstaben. Für den 
normalen Brief mag dies in Verbindung mit der NLQ- 
Option ausreichen, ein Briefkopf oder eine Einladung 
sollte jedoch eine bessere optische Wirkung haben. 
Unser Autor Armin Kreutz entwickelte ein Programm, 
das den altdeutschen Zeichensatz zu Papier bringt. 
Um den praktischen Nutzen zu beweisen, paßte er die- 
ses Listing gleich an das Textverarbeitungsprogramm 
Easy Write an, welches in unserer Ausgabe 2/87 er- 
schien. Zur Entstehung und Bedienung des Program- 
mes der Autor selbst: 


Hardwarevoraussetzungen: 


Um dieses Programm nutzen zu können, benötigt 
man einen Epson FX-80-kompatiblen Drucker, der 
folgende Escape-Codes versteht: 
ESC Lnin2: Bit Image Mode — doppelte Dichte 
ESCj.n: Druck für Papiertransport rück- 
wärts (notwendig für den Doppel- 
druck bei der Easy Write-Drucker- 
routine ). 
Um die Schrift komfortabel zu gestalten wurde das 
Programm für eine 8-Bit-Druckerschnittstelle ge- 
schrieben, die wohl fast jeder CPC-User in seinem 
Computer eingebaut hat, um die unvorteilhafte 7-Bit- 
Konstruktion von Amstrad zu umgehen. Sollte dies 
bei Ihnen nicht der Fall sein, kann das kleine Kabel 
ja noch auf die in mehreren Zeitungen veröffent- 
lichte Art und Weise nachträglich eingelötet werden. 
Damit die altdeutsche Schrift in jedem Programm 
sinnvoll verwendbar ist, wurde sie als RSX-Befehls- 
erweiterung konzipiert. Ein Zusatzlisting arbeitet 


Bitte lesen Sie weiter auf Seite 70 


63 


TTLLLL—————————————————————————————————————————— 


LISTING 


IC RRRESEIEIESEIEIEIESESESESESESESESETESEESESESESESETE SEES 
2 % ALTDEUTSCHE SCHRIFT # 
3 + VON * 
a '* ARMIN KREUTZ * 
5 # FUER * 
6 ’* SCHNEIDER AKTIV * 
8 + CPC 464 * 
9 HH EEE III TEASER SENSE TEE 


1D MEMORY E9SFF 
11 RESTORE 70:summe=0:FOR adr=38400 


TO 42336:READ obj:POKE adr,obj 
20 summe=summe+ob j:GOSUB 40:NEXT:GO 
SUB 50 
30 IF fehler<>O THEN PRINT "Es sind 
".fehler;"Fehler aufgetreten.” :PRIN 
T:END ELSE CLS:PRINT"ok.":CALL EASA 
6: END 
40 IF ((adr-38400) MOD 16)<>15 THEN 
RETURN 
50 READ ver:IF summe<>ver THEN fehl 
er=fehler+1:zadr=PEEK( EAE2E) +PEEK(& 
AE2F)#256:PRINT "Summenfehler in Ze 
ile";PEEK( zadr) +PEEK( zadr+1) #256 
60 summe=0:RETURN 
70 DATA 32, 8, 0, 0, 0, 0, 0 
‚ 0, 0, 0, 0, 0, 0, 0, 0, 
0, 40 


80 DATA 0, 0, 0, 0, 65, ı2, 32 
, 96,192,192,225,127, 63, 0, 0,6 
3, 1067 


90 DATA 127,128, 0, 0, 0, 0, 0 

0, 66, 12, 32, 64, 79, 80,103, ? 
770 

00 DATA 152, 50, 98, 

‚0,0, 0, 0, 0, 6, 

3, 706 

110 DATA 96,192,129,192,222,239, 9 

6, 96,192, 96,128, 0, 0, 0, 0, 
0, 1678 

120 DATA 68, 12, 64,207,255, 192,25 

5,193,194,199,194,228,127, 63, 0, 
0, 2251 

130 DATA 0, 0, 0, 0, 69, ı3, 3 

1, 63, 96, 79, 31, 64,127,194,198,1 


68,107, 57, 


’ 
g, 
10 
0 13, 31, 
6 


10, 1075 
140 DATA 118,100, 64, 0, 0, 0, 
0, 0, 70, 13, 32,112,216,200, 128,1 
28, 1181 

150 DATA 193, 97,111,119, 99, 66,12 
8, 0, 0, 0, 0, 0, 71, ı3, ı5, 
31, 943 

160 DATA 48, 96, 64, 64,255, 68, 7 


6,212,228,199,128, 0, 0, 0, 0, 
0, 1438 

170 DATA 72, 14, 2, 7, 15, 0,3 
1, 63, 96,193,195,227, 99, 99, 97,1 
28, 1338 

180 DATA 0, 0, 0, 0, 73, 12, 3 
2, 96,192,192,128, 128,192, 111,119, 
96, 1371 


190 DATA 64,128, 0, 0, 0, 0, 
0, 0, 74, ı2, 32, 96,192,192,128,1 
1046 

DATA 192,111,119, 96, 64,128, 
0, 0, 0, 0, 0, 0, 75, 11, 30, 
63, 889 

210 DATA 105,208, 145, 179,181, 180,15 
6,192, 9%, 0, 0, 0, 0, 0, 0, 
0, 1442 

220 DATA 76, 10, 28, 62,103,195,12 
8,128,128,128,208,112, 0, 0, 0, 
0, 1306 

230 DATA 0, 0, 0, 0, 77, 16, 4 
8,120,200, 96, 63, 95,128,192, 96, 


63, 1194 

240 DATA 95,128,128, 96, 63, 31, 
0, 0, 78, 11, 48,120,200, 96, 63, 
95, 1252 ° 

250 DATA 128,192, 96, 63, 31, 0, 
0, 0, 0, 0, 0, 0, %, ı3, 15, 
31, 648 

260 DATA 48, 96,192,255,255, 64,19 


2,192, 9, 63, 31, 0, 0, 0, 0, 
0, 1484 

270 DATA 80, 12, 48, 64, 32, 63, 1 
6, 48, 96,192,128,192,127, 62, 0, 
0, 1160 

280 DATA 0, 0, 0, 0, 81, 13, 1 
5, 31, 48, 96,192,255,255, 64,192,1 
1434 

DATA 96, 63, 31, 0, 0, 0, 

0, 0, 82, 13, 32,112,216,136, 128, 
973 

DATA 63, 31, 
86, 0, 0, 0, 0, 0, 83, 

63, 770 

310 DATA 96,192,131,193,193,225, 9 

7, 99,194,129, 0, 0, 0, 0, 0, 
0, 1549 

320 DATA 84, 12, 32,112,216,136,12 
8,192,111,127, 96, 96, 64,128, 0, 
0, 1534 

330 DATA 0, 0, 0, 
4,128,127, 63, 0, 0, 
0, 667 

340 DATA 0, 0, 0, 0, 0, 0, 
0, 0, 86, 12, 48,120,200, 96, 63, 
720 

DATA 128,128, 64,111, 

0, 0, 0, 0, 0, 0, 8, 
773 

DATA 200, 96, 63, 95,128,192, 9 
6, 63, 95,128,192, 95,111, 32, 0, 
0, 1586 

370 DATA 88, 10, 32, 64,192, 97, 6 
3, 23, 33, 66, 80, 32, 0, 0, 0, 
0, 780 

380 DATA 0, 0, 0, 0, 89, 12, 4 
8,120,200, 96, 63,111,128, 128,192, 
96, 1283 


36,102,197,104, 4 
12, 31, 


0, 85, 10, 6 
0, 63,127, 


55, 16, 
16, 48,1 


64 


a  ————————————————— 


LISTING 


390 DATA 63, 31, 0, 0, 0, 0, 590 DATA 0, 

0, 0, 90, 9, 48,120,200,128,128,1 0, 0,105, 4, 

93, 1010 0, 232 

400 DATA 97, 62, 28, 0, 0, 0, 600 DATA 0, 

0, 0, 0, 0, 0, 0, 91, 12, 16, 0, 0, 0, 0, 

48, 354 55, 198 

410 DATA 96, 96,112, 63,159, 0, 610 DATA 34, 
0,159, 63, 64, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 812 0, 34 

420 DATA 92, 13, 3, 7, 12, 24,17 620 DATA 107, 

6, 63, 63, 16,176, 48, 24, 15, 7, 5, 2, 0, 0, 
0, 739 0, ass 

430 DATA 0, 0, 0, 0, 93, 10, 3 630 DATA 0, 
2, 64, 63,159, 0, 0,128, 31, 63, 4, 63, 64,128, 
0, 643 0, 431 

aa0 DATA 0, 0, 0, 0, 0, 0, 640 DATA 0, 
0, 0,46, 5, 0, 0, 0, 0, 0, 0, 0,109, 10, 
0, 51 7, 139 

450 DATA 0, 0, 0, 0, 0, ©, 650 DATA 1, 
0, 0, 0, 0, 0, 0,44, 5, 0, 0, 0, 0, 0, 
0, 39 2, 130 

460 DATA 0, 0, 0, 0, 0, 0, 660 DATA 7, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, D 0, 17 

470 DATA 33, 6, 7,120,129,131,25 670 DATA 111, 
4, 60, 0, 0, 0, 0, 0, 0, 0, 3, 0, 0, 0, 
0, 740 0, 130 

480 DATA 0, 0, 0, 0, 63, ?, 3 680 DATA 0, 
2, 96,193,131,198,108, 56, 0, 0, 2, 7%, 2, 4, 
0, 884 0, 141 

490 DATA 0, 0, 0, 0, 0, 0, 690 DATA 0, 
0, 0, 9, 7,0, 132 4 0, 0,113, 8, 
7, - 121 2, 133 

500 DATA 2, 0, 0, 0, 0, 0, 700 DATA .7, 
0, 0, 0, 0, 0, 0, 98, 9, 64, 0, 0, 0, 0, 

63, 236 3, 136 

510 DATA 65,130, 4, 4, 6, 3, 710 DATA 1; 
1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 213 0, 9 

520 DATA 99, 6, 0, 1, 3, 6, 720 DATA 115, 

4, 2, 0, 0, 0, 0, 0, 0, 0, 6, 6, 4, 8, 
0, 121 0, 156 

530 DATA 0, 0, 0, 0,100, 7,6 730 DATA 0, 

4,163, 20, 24, 12, 7, 3, 0, 0, 4, 12,255, 4, 
0, 400 0, 395 

540 DATA 0, 0, 0, 0, 0, 0, 740 DATA 0, 

0, 0,101, 6, 0, 1, 2, 4, 6, 0, 0,117, 6, 
3, 123 2; 143 

550 DATA 0, 0, 0, 0, 0, ©, 750 DATA 0, 

0, 0, 0, 0, 0, 0,102, 5, 4,1 0, 0, 0, 0, 

27, 238 ü 7, 1385 

560 DATA 199,132, 4, 0, 0, 0, 760 DATA 9, 

0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 335 0, 2 

570 DATA 103, 7, 0, 1, 3, 2, 770 DATA 119, 

4, 7, 2, 0, 0, 0, 0, 0, 0, 7, .1, 2, 7, 
0, 129 0, 158 

580 DATA 0, 0, 0, 0,104, 7,6 __78O DATA D, 

4, 63, 66,132, 3, 1, 0, 0, 0, 4, 3, 1, 2, 
0, 440 0, 1a2 


0, 
34, 


0, D, 
55, 34, 


0, 
0, 


0, 0, 
0,106, 


0, 
0, 


L) 
0, 


6, 64, 63, 66,132, 


0, 


0, 0, 0, 


0, 


| LISTING | 


790 DATA 0, 0, 0, 0, 0, 0, 990 DATA 0, 0, 0, 0, 0, 0, 

0, 0,121, 7, 0, 15, 2, 4 3 0, 0, 48, 10, 31, 35, 64,192, 128,1 
1, 153 92, 700 

800 DATA 0, 0, 0, 0, 0, 0, 1000 DATA 96,112, 56, 15, 0, 0, 

0, 0, 0, 0, 0, 0,122, 6, 0, 0, 0, 0, 0, 0, 0, 49, 4, 16, 
0, 128 32, 380 

B10 DATA 2, 4, 3, 0, 0, 0, 1010 DATA 127,255, D, 0, 0, 0, 

0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 9 0, 382 ’ 

820 DATA 123, 7, 0, 1, 3, 18, 1020 DATA 50, 8, 32, 88,136,128B, 

4, 7, 16, 0, 0, 0, 0, 0, 0, ' 65, 99, 63, 30, 0, 0, 0, 0, 0, 
0, 179 0, 699 

830 DATA 0, 0, 0, 0,124, 6, 1030 DATA 0, 0, 0, 0, 51, 10, 
1, 18, 4, 3, 19, 0, 0, 0, 0, 0, 32, 64, 66, 78, 90,227, 3, 2, 
0, 175 0, 623 

840 DATA 0, 0, 0, 0, 0, 0, 1040 DATA 0, 0, 0, 0, 0, 0, 
0, 0,125, 6, 2, 23, 0, 2, 23, 0, 0, 52, 9, 1, 6, 28, AB, 96, 
2, 183 207, 447 

850 DATA 0, 0, 0, 0, 0, 0, 1050 DATA 255, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0,126, 8, 4,2 0, 0, 0, 0, 0, 0, 53, 9, 2, 
55, 393 14, 333 

860 DATA 129, 66,132, 4, 3, 1, 1060 DATA 28, 44,236,204, 71,131,1 
0, 0, 0, 0, 0, 0, 0, 0, 0, 29, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 335 0, 843 

870 DATA 34, 4A, 32,192, 32,192, 1070 DATA 54, 9, 3, 7, 31, 44,2 
0, 0, 0, 0, 0, 0, 0, 0, 0, 36,204, 71,131,129, 0, 0, 0, 0, 
0 486 0, 919 


’ 
860 DATA 0, 0, 0, 0, 39, 2, 3 1080 DATA 0, 0, 0, 0,55, 7, 
2,192, 0, 0, 0, 0, 0, 0, 0, 96,192, 65,131,206, 88,240, 0, 0, 


0, 265 0, 1080 

890 DATA 0, 0, 0, 0, 0, 0, 1090 DATA 0, 0, 0, 0, 0, 0, 

0, 0, 40, 6, 0, 15, 56, 96, 64, 0, 0, 56, 8, 56,125,207, 130,130, 
0, 277 79, 79 

900 DATA 0, 0, 0, 0, 0, 0, 1100 DATA 125, 56, 0, 0, 0, 0, 

0, 0, 0, 0, 0, 0, 41, 6, 0, 0, 0, 0, 0, 0, 0, 57, 9, 30, 
0, 9 127, 404 

910 DATA 64, 32, 31, 0, 0, 0, 1110 DATA 195,129,128,128, 97, 51, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 15, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 127 0, 743 

920 DATA 45, 7, 0, 1, 1,1, 1120 DATA 32, 8, 0, 0, 0, 0, 
1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 57 0, 40 

930 DATA 0, 0, 0, 0, 58, 5, 1130 DATA 0, 0, 0, 0, 65, ı2, 
8, I, 5 u 0, 0 9, 0 16, 48,112,208,152, 8, 8, 16, 32, 
0, 66 240, 917 

940 DATA 0, 0, 0, 0, 0, 0, 1140 DATA 248, 6, 0, 0, 0, 0, 

0, 0, 59, 5, 0, 1, 1, 1,0, 0, 0, 66, 12, 0, 8,240, 48,240, 
0, 67 176, 1046 

950 DATA 0, 0, 0, 0, 0, 0, 1150 DATA 56, 24, 24, 48,240,240, 

0, 0, 0, 0, 0, 0, 43, 7, 0, 0, 0, 0, 0, 0, 0, 67, 13,192, 
1, 51 240, 1144 

960 DATA 1, 7, 1, 1, 0, 0, 1160 DATA 48,152, 88, 72, 72,152, 

0, 0, 0, 0, 0, 0, 0, 0, 0, 24, 24, 24, 16, 32, 0, 0, 0, 0, 
0, 10 0, 704. 

970 DATA 42, 7, 0, 4, 2, 1, 1170 DATA 68, 12, 8,240,208, 16,2 
2, 4, 0, 0, 0, 0, 0, 0, 0, 40, 56, 24, 24, 24, 48,224,192, 0, 
0, 62 0, 1384: 

980 DATA 0, 0, 0, 0, 61, 7, 1180 DATA 0, 0, 0, 0, 69, 13,1 
0, 2, 2, 2, 2, 2, 0, 0, 0, 92,240, 48,216,152, 8,255, 24, 24, 
0, 78 24, 1265 

66 
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LISTING 


1190 DATA 24, 16, 32, 0, 0, 0, 
0, 0, 70, 13, 0, 88, 60, 36, 6, 
2, 347 

1200 DATA 3, 3,227,246, 28, 0, 
0, 0, 0, 0, 0, 0, 71, 13,192, 

240, 1023 

1210 DATA 48, 24, 24, 8,254, 8, 
8, 24, 48,224,192, 0, 0, 0, 0, 
0, 862 

1220 DATA 72, 14, 8,248,216, 24,2 


48,216, 24,240, 0, 3, 6,252,248, 
0, 1819 
1230 DATA 0, 0, 0, 0, 73, ı2, 
96,240,144, 24, 8, 12, 12, 12,220, 
112, 965 
1240 DATA 0, 0, 0, 0, 0, 0, 
0, 0, 74, ı2, 24, 60, 36, 6, 2, 
3, 217 
1250 DATA 3,227,247, 28, 0, 0, 
0, 0, 0, 0, 0, 0, 75, 11, 24, 
8, 623 
1260 DATA 152,240, 0, 0,128,224, 
56, 8, 0, 0, 0, 0, 0, 0, 0, 
0, 808 
1270 DATA 76, 10, 8, 16,112,176, 
48, 56, 24, 24, 24, 16, 0, 0, 0, 
0, 590 
12860 DATA 0, 0, 0, 0, 77, 16, 
0, 16, 56, 88,128, 0, 16, 56, 88, 
128, 669 
1290 DATA 0, 16, 56, 88,128, 0, 
0, 0, 78, 11, 0, 16, 56, 88,128, 
0, 665 
1300 DATA 16, 56, 88,128, 0, 0, 
0, 0, 0, 0, 0, 0, 79, 13,192, 
240, 812 
1310 DATA 48, 24, 88,136, 8, 8, 
16, 32, 64,128, 0, 0, 0, 0, 0, 
0, 552 
1320 DATA 80, 12, 0, 8, 16,255, 
16, 24, 8, 16, 32, 64,128, 0, 0, 
0, 659 
1330 DATA 0, 0, 0, 0, 81, 13,1 
92,240, 48, 24, 88,136, 8, 72, 80, 
32, 1014 
1340 DATA 80,144, 0, 0, 0, 0, 
0, 0, 82, 13, 0, 0, 16, 56,104, 
192, 687 
1350 DATA 128, 0, 0, 0,240,248, 
16, 0, 0, 0, 0, 0, 83, 12,192, 
240, 1159 
1360 DATA 48, 24, 24, B8,136,136,1 
52, 48, 96,192, 0, 0, 0, 0, 0, 
0, 864 
1370 DATA 84, 12, B, 16, 16, 48, 
48, 24,248,216, 24, 24, 16, 32, 0, 
0, 816 
13860 DATA 0, 0, 0, 0, 85, 10, 
16, 56,216,152, 24, 24, 48,240,248, 
16, 1135 


1390 DATA 0, 0, 0, 0, 0, 0, 
0, 0, 86, 12, 0, 16, 56, 88,136, 
8, 402 
1400 DATA 8, 8, 24,176,192, 0, 
0, 0, 0, 0, 0, 0, 87, 16, 0, 
16, 527 
1410 DATA 56, 88,152, 16, 16, 56, 
88,152, 16, 24, 48,144,192, 0, 0, 
0, 1048 
1420 DATA 88, 10, 16, 40,136, 16,2 
24,208, 24, 12, 8, 16, 0, 0, 0, 
0, 798 
1430 DATA 0, 0, 0, 0, 89, ı2, 
0, 16, 56, 88,129, 1, 3, 6, ı2, 
24, 436 
1440 DATA 248,240, 0, 0, 0, 0, 
0, 0, 90, 9, 8,14, 7, 114, 
1, 619 
1450 DATA 3,254,252, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 91, ı2, 8, 
24, 644 
1460 DATA 56,104,204,132, 4, 8, 
16,248,252, 4, 0, 0, 0, 0, 0, 
0, 1028 
1470 DATA 92, 13,240,252, 12, 6, 


22,226,194, 2, 
0, 1503 

1480 DATA 0, 

16, 56,236,204, 
8, 1171 

1490 DATA 0, 
0, 0, 46, 5, 
0, 107 

1500 DATA 0, 
0, 0, 0,0 
18, 67 

1510 DATA 28, 
0, 0, 0, 0, 
0, 44 

1520 DATA 33, 
0, 0, 0, 0, 
0, 415 

1530 DATA 0, 
0,192, 40, 44, 
0, 450 

1540 DATA 0, 
0, 0, 9, 7, 

248, 872 

1550 DATA 8, 
0, 0, 0, 0, 

240, 355 

1560 DATA 24, 

28, 0, 0, 0, 
0, 472 

1570 DATA 99, 
8, 16, 0, 0, 
0, 617 

1580 DATA 0, 
0,224, 16, 8, 
0, 651 
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4, 8, 16,224,192, 


0, 0, 0, 93, 10, 


24,248,252, 


0, 
24, 


0, 
16, 


0, 


0, 
a4, 


0, 0, 
5,0, 


0, 
0, 


0, 0, 
0, 0, 


6,144, 88,144, 
0, 0, 0, 0, 


0, 0, 
40, 64, 


0, 
0, 


63, 7, 
0, 0, 


0, 0, 0, 
96,248, 152, 


D, 
8, 


0, 
0, 


0, 0, 
0, 98, 


0, 0, 
9, 0, 


B, 24, 56,224,1 

0, 0, 0, 0, 0, 

6,192,224, 48, 24, 
0, 0, 0, 0, 0, 


0, 0, 0,100, 7, 
24, 48,224, 0, 0, » 


LISTING | 


1590 DATA 0, 0, 0, 0, 0, 0, 1790 DATA 0, 0, 0, 0, 0, 0, 
0, 0,101, 6,192,224, 45, 88,136, 0, 0,119, 6, 0,248, 16, 32,248, 
16, 811 16, 683 

1600 DATA 0, 0, 0, 0, 0, 0, 1800 DATA 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0,102, 5, 0, 0, 0, 0, 0, 0, 0,118, 8, 0, 

255, 362 96, 222 
1610 DATA 224, 0, 0, 0, 0, 0, 1810 DATA 144, B, 48,224,128, D, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 

0, 224 0, 552 

1620 DATA 103, 7, 96,242,153, 9, 1820 DATA 119, 9, 16,248, 16, 0,2 

17,242, 12, 0, 0, 0, 0, 0, 0, 48, 8, 16,224,192, 0, 0, 0, 0, 
0, 881 0, 1096 

1630 DATA 0, 0, 0, 0,104, 7, 1830 DATA 0, 0, 0, 0,120, 6, 

16,248, 16, 1, 30,248, 96, D, 0, 6,249, 9, 18, 0, 0, 0, 0, 0, 
0, 766 0, 408 

1640 DATA 0, 0, 0, 0, 0, 0, 1840 DATA 0, 0, 0, 0, 0, 0, 

0, 0,105, 4, 0,240, B, 16, 0, 0, 0,121, 7, 16,248, 16, 1, 30, 
0, 373 248, 687 

1650 DATA 0, 0, 0, 0, 0, ©, 1850 DATA 96, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0,106, 3, 1, 0, 0, 0, 0, 0, 0,122, 6, 4, 
254, 364 14, 242 
1660 DATA 1, 0, 0, 0, 0, 0, 1860 DATA 81,167, 62, 24, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 

0, q 0, 334 
1670 DATA 107, 6, 16,248, 16,128,1 1870 DATA 123, 7, 96,248,152, B, 
20, 16, 0, 0, 0, 0, 0, 0, 0, 16,248, 8, 0, 0, 0, 0, 0, 0, 
0, 657 0, 906 

1680 DATA 0, 0, 0, 0,108, 4, 1880 DATA 0, 0, 0, 0,124, 6, 

16,240, 16, 0, 0, 0, 0, 0, 0, 40, 16, 8, 56,240,192, 0, 0, 0, 
0, 384 0, 882 

1690 DATA 0, 0, 0, 0, 0, 0, 1890 DATA 0, 0, 0, 0, 0, 0, 
0, 0,109, 10, 0, 16,240, 16, 0, 0, 0,125, 6, 0,248, 16, 32,248, 

240, 631 16, 691 
1700 DATA 16, 0,240, 16, 0, 0, 1900 DATA 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0,110, 7, 0, 0, 0, 0, 0, 0, 0,126, 8, 0, 
16, 405 255, 389 

.1710 DATA 240, 16, 0,240, 16, 0, 1910 DATA 3, 33, 65,182,142, 4, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 

0, 512 0, 429 
1720 DATA 111, 6,240, 16, B, 56,2 1920 DATA 34, A, 0, 0, 0, 
40,192, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 869 0, 38 

1730 DATA 0, 0, 0, 0,112, 8, 1930 DATA 0, 0, 0, 0, 39, 2, 

16,255, 16, 8, 8,152,240, 96, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 991 0, 41 

1740 DATA 0, 0, 0, 0, 0, 0, 1940 DATA 0, 0, 0, 0, 0, ; 
0, 0,113, 8, 96,240,152, 8, 8, 0, 0, 40, 6, 0,224, 16, 8, 0, 
16, 641 0, 294 
1750 DATA 255, 16, 0, 0, 0, 0, 1950 DATA 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0,114, 6, 0, 0, 0, 0, 0, 0, 0, 41, 6, 0, 

248, 639 B, 55 
1760 DATA 16, 0, 0, 0, 0, 0, 1960 DATA 24,112,192, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 

0, 16 0, 328 
1770 DATA 115, 8, 2,196,108,108,1 1970 DATA 45, 7, 0, 
08,106, 566, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 809 0, 52 

1780 DATA 0, 0, 0, 0,116, 4, 1980 DATA 0, 0, 

0, 16,248, 16, 0, 0, 0, 0, 0, 0, 16,152, 16, 0, 0, 0, 0, 0, 
0, 400 0, 247 
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LISTING 


1990 DATA 0, 0, 0, 0, 0, 0, 
0, 0, 59, 5, 0, 18,156, 16, 0, 
0, 254 
2000 DATA 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0,43, 7, 0, 
0, 50 
2010 DATA 0,192, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 192 
2020 DATA 42, 7, 0, 64,128, 0,1 
28, 64, 0, 0, 0, 0, 0, 0, 0, 
0, 433 
2030 DATA 0, 0, 0, 0, 61, 7, 
0,128,128,128,128,128, 0, 0, 0, 
0, 708 
2040 DATA 0, 0, 0, 0, 0, 0, 
0, 0, 48, 10,128,224,224,112, 56, 
24, 826 
2050 DATA 24, 56,224, 0,,0, 0, 
0, 0, 0, 0, 0, 0,49, 4, 0, 
0, 357 
2060 DATA 248,240, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 488 
2070 DATA 50, 8, 8, 24,120,200,1 
44,136, 8, 16, 0, 0, 0, 0, 0, 
0, 71a 
2080 DATA 0, 0, 0, 0, 51, 10, 
64,160, AB, 24, 8, 8, 16,176,224, 
192, 981 
2090 DATA 0, 0, 0, 0, 0, 0, 
0, 0, 52, 9,128,128,128, 128,128, 
248, 949 
2100 DATA 248,128,128, 0, 0, 0, 
0, 0, 0, 0, 0, 0,53, 9, 0, 
0, 566 
2110 DATA 1, 1, 2, 4, 24,240,2 
24, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 496 
2120 DATA 54, 9,128,224, 48, 8, 
8, B, 56,240,224, 0, 0, 0, 0, 
0, 1007 
2130 DATA 0, 0, 0, 0,55, 7,1 
12,248,248,192, 0, 0, 0, 0, 0, 
0, 862 
2140 DATA 0, 0, DO, 0, 0, 0, 
0, 0, 56, 8,224,240, 16, 8, 8, 
24, 584 
2150 DATA 240,224, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 57, 9, 32, 
16, 578 
2160 DATA 136, 136,136, 136,200,248, 
48, 0, 0, 0, 0, 0, 0, 0,0, 
0, 1040 
2170 DATA 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0 
2180 DATA 0, 0, 0, 0, 0, 0, 
0, 0, 08, 0, 0, 0, 0, 0, 0, 
0, 0 


2190 DATA 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0) 
2200 DATA 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0,0, 
0, 0 
2210 DATA 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 1) 
2220 DATA 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0 
2230 DATA 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0 
2240 DATA 0, 0, 6, 0, 0,. 0, 
0, 0, 0, 0, 0, 0, 0, 0,0, 
0, 0 
2250 DATA 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0 
2260 DATA 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, ) 
2270 DATA 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0,0, 
0, 0 
2280 DATA 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0 
2290 DATA 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 1) 
2300 DATA 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0 
2310 DATA 0, 4,120,166, 78, 0, 
3, 27, 65, 8, A, 27, 76, 78, 0, 
1, 657 
2320 DATA 10, 71, 33,124,156, 17, 
20, 0, 14, 0, 25,124,254, 164,200, 
126, 1338 
2330 DATA 184, 32,247, 14,255 201, 
33, 0, 0, 34, 4,164,235, 70,120, 
50, 1643 
2340 DATA 1,164, 35, 94, 35, 86,2 
35, 17, 0, 0, 34, 2,164, 43, 35, 
126, 1071 


2350 DATA 197,229,205, 
54,255, 32, 35, 35,126, 42, 
22, 1902 
2360 DATA 
25,193, 16,228, a2, 
4, 1526 
2370 DATA 164, 25, 22, 0, 58, 1,1 
64, 95, 25, 34, 4,164,201,245, 62, 
1, 1265 
2380 DATA 50, 0,164,241, 
35, 70, 35,126,254,128, 56, 
245, 1860 


17,164, 121,2 
4,164, 


0, 95, 25, 34, 4,164,2 
4,164,237, 91, 


24,224, 
11,197, 


LISTING 


2390 DATA 1, 0,246, 62, 32,237,1 

21,241,193,245,205, 46,189, 56,251, 

205, 2330 

2400 DATA 49,189,241,205, 46,189, 

56,251,205, 49,189,197, 1, 0,246, 
62, 2175 

2410 DATA 0,237,121,193, 16,210, 

62, 0,205, 46,189, 56,251,205, 49, 

189, 2029 

2420 DATA 201, 

05, 38,164, 58, 
90, 1491 

2430 DATA 58, 

83, 42, 4,164, 34, 

164, 1241 

2440 DATA 205, 32,165, 33, 10,164,2 

05, 32,165, 33,236,149, 34, 19,164, 

205, 1851 

2450 DATA 254,164, 33,124,156, 34, 

19,164, 33, 15,164,205, 32,165, 33, 
10, 1605 

2460 DATA 164,205, 32,165,205,254, 1 

64, 33, 15,164,205, 32,165,201, 42, 
2, 2048 

2470 DATA 164, 58, 

97, 35,126,229,205, 

255, 2104 

2480 DATA 322, 

93, 16,237,201, 62, 

201, 2146 

2490 DATA 70, 35,126,254,128, 56, 

11,197,245, 1, 0,246, 62, 32,237, 

121, 1821 

2500 DATA 241,193,205, 46,189, 56,2 

51,205, 49,189,197, 1, 0,246, 62, 
0, 2130 

2510 DATA 237,121,193, 16,220,201, 
1, 79,165, 33, 90,165,195,209,188, 
84, 2197 

2520 DATA 165,195,177,164, 68, 82, 

85, 67,203, 0,252,166, 79,165, 0, 
0, 1868 

2530 DATA 0, 0 


0,164,2 
40, 


62, 0, 50, 
0,164,254, 1, 


5,164,254, 5, 48, 
13,164, 33, 6, 


1,164, 71, 43,1 
17,164, 121,254, 


3,205,118,164,225,1 
7,205, 90,187, 


Fortsetzung von Seite 63 


mit dem Textprogramm Easy Write zusammen, wel- 
ches in Schneider aktiv 2/87 abgedruckt war. 

Dabei wird jeder Text, der ohne die Sonderfunktio- 
“nen (Unterstreichen, Fettdruck, usw.) geschrieben 
und der mit dem Pfundzeichen (als Markierung 

des Textendes) abgespeichert wurde, in altdeutscher 
Schrift ausgegeben. 


Tips zum Abtippen: 


Tippen Sie den Basic-Lader der Befehlserweiterung 
ab und speichern Sie ihn dann auf Ihrem Disketten- 
oder Kassettenlaufwerk. Erst nach dem Abspeichern 
sollten Sie testen, ob Sie alles richtig abgetippt ha- 

‘ ben, da es bei Fehlern im aäbgetippten Programm 
sonst eventuell zu einem Systemabsturz kommen 
könnte. Das bereits eingegebene Programm wäre da- 
mit verloren. 


EHRE HIERIEIEIEIEIESESEIEIESESESESESE SEE IE SEITE 


1 

2 '* ALTDEUTSCHE SCHRIFT * 
3 '# MIT EASY WRITE DRUCKEN * 
a '* VON * 
5 '# ARMIN KREUTZER * 
6 ’* FUER * 
7% SCHNEIDER AKTIV * 
8 ’* CPC 464 * 
9 


BREITET TESTEN IE SEE IE SESESESE SEE SEE SEE IE IE SE 


10 MEMORY 9999 

20 MODE 2:LOCATE 10,10:INPUT "Geben 
Sie den Namen des Textes ein: ”,na 

me$ 

30 LOAD name$, 10000 

40 LOCATE 10, 10:PRINT"Soll der Text 
mit Fettdruck geschrieben werden ( 
3/n) ?” 

SD q$=INKEY$:IF q$="" THEN 50 

60 IF UPPER$(Lq$)<>"J" THEN doppel=O 
ELSE doppel=-1 

70 flag=1:adr=10000 

80 WHILE NOT flag 

90 FOR a=adr TO adr+59 

100 zeile$=zeile$+CHR$( PEEK( a)) 

110 NEXT 

120 IF INSTA( zeile$,CHRA$( 163))<>O T 

HEN flag=-1:G0TO 160 

125 IF MID$( zeile$,LEN( zeile$) ,1)=C 

HR$( 32) THEN zeile$=LEFT$(zeile$,(L 

EN( zeile$)-1)):IF LEN(zeile$)<>O TH 

EN 125 

126 IF LEN(zeile$)=0 THEN PRINT#8,C 

HR$( 10) ;CHRA$( 10) ; :GOTO 150 

130 | DRUCK, @zeile$ 

140 IF doppel THEN PRINT#8,CHR$( 27) 
;”3";CHR$( 48) ; :| DRUCK ,@zeile$ 

150 zeile$="":adr=adr+60 

160 WEND 

170 END 


Bedienungsanleitung: 


Wenn Sie die Befehlserweiterung mit Hilfe des Basic- 
Laders installiert haben, können Sie den neuen Befehl 
wie einen PRINT #8-Befehl verwenden. Der zu druk- 
kende Text muß sich in einer Stringvariable befinden, 
so daß der Befehl nun folgendes Format hat: 
IDRUCK ‚@a$ 
Der Befehl überprüft auch, ob die Zeichen überhaupt 
vorhanden sind und der String die maximale Länge 
von 1280 Pixel nicht überschreitet. Ist ein derartiger 
Fehler vorhanden, dann meldet sich der CPC mit dem 
Warnsignal -CHR$(7) — und ignoriert den eingegebe- 
nen String. 
Die Anleitung für die Druckerroutine, die mit Easy 
Write arbeitet, erklärt sich fast von selbst. Wenn Sie ei- 
nen Text in der oben erläuterten Form mit dem Text- 
peosunn geladen haben, können Sie noch zwischen 
ormal oder Doppeldruck wählen und den Text aus- 
drucken lassen. 
Mit Hilfe dieser Anleitung dürfte es nun niemand 
mehr schwer fallen, mit der altdeutschen Schrift zu 
arbeiten und einige Texte nun in einer besonders ge- 
fälligen Form auf das Papier zu bringen. 
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————— 


x*X*X JANUAR 1987 X%%k xkk JULI 1987 XXX 


„anna nmnnmnnunmamamnnmunnnmunmnmammnnnmnemnmnumnnmmnmummmme s„azassamnmmasmananamsamsmemsasmsnnannssenmannenannnsnmsnunneun:m 


 monnnnsmamnsanmasamnnmuuunnmmumannssamnnunnmmsnmnmsnunummmm s.unnnnsanaaneasanuesenununaunsesuuszemunsnunsmusememmusunnne 


ı2 2 3 4 1 2 3 4 3 

3 63 7 8 9 10 11 6 7 8 9 10 1 12 

12 13 14 15 16 17 18 13 14 15 16 17 18 19 

19 20 2 22 23 24 .25 20 21 2 23 24 25 26 
26 27 28 29 30 3 2] 28 29 30 3 


1. Neujahr 6. Heilige drei Koenige 


*k*k FEBRUAR 1987 *kX xx AUGUST 1987 *XkX 


NONTAG DIENSTAG MITTWOCH DONNERST FREITAG SAMSTAG SONNTAG NONTAG DIENSTAG MITTWOCH DONNERST FREITAG SAMSTAG SONNTAG 
l l 2 
2 3 4 E) 6 7 8 3 4 3 6 7 8 9 
9 10 1 12 13 1433 15 10 1 12 13 14 15 16 
16 17 18 19 20 2 17 18 19 20 2 22 23 


28 24 25 
14. Valentinstag KALENDER 


Über Sinn: und Nutzen eines Kalenders muß man 
x**k MAERZ 19wohl nichts schreiben. Jeder benötigt ihn, ohne dad BER 1987 xkk 


SRanSensnanEauanenunnannannnennneen darüber viel Worte zu verlieren wären. Lassen wir also ------------------ ----- 
MONTAG DIENSTAG MITTWOCH DONNERSIlIeber Rudolf Bodinger mit seiner Programmbeschrei- DONNERST FREITAG SANSTAG SONNTAG 
BEER anne bung zu Worte kommen. ea re air 
3 4 5 6 
2 34 DR ; 5 _Programmbeschreibung: 10 u 12 13 


16 7 18 “ Das Programm wurde in Basic auf dem Schneider CPC u 35 6 27 
23 24 25 26 464 geschrieben und als Drucker wurde ein Panasonic 
KX-P1091 verwendet. Eine Anpassung an andere Prin- 
3. Fastnacht 4. Aschter-Modelle dürfte kein Problem sein. Die Zeilen, in 
s k welcher die Druckeranweisungen stehen, sind im 
Listing mit Doppelkreuzen (###) gekennzeichnet. 
xkk APRıL 19Der Kalender kann ab dem Jahre 1800 bis zum Jahre eR 1987 xxk 


PEN ESIEIEN ER REHEETNENEER 2099 monatlich ausgegeben und, wenn gewünscht, ge- 4... 2.22. 
MONTAG DIENSTAG MITTWOCH ponwersidruckt werden. Dabei hat man die Wahl zwischen dempgnNERST FREITAG SANSTAG SONNTAG 
N SE Monat oder dem ganzen Jahr, welches auf eine DIN nenn 
N 2  A4-Seite paßt. Jahre vor 1900 werden ohne Feiertage, y 2 3 4 
6 7 98 9 ansonsten immer mit Feiertagen ausgegeben. Dazu ge- 8 9 10 1 
13 14 15 16. 18 hören auch andere Termine wie etwa der Fasching. 15 16 1 18 
X 2a 2 23 Will man einen Jahreskalender ausdrucken, braucht Pr 23 24 N 
27 28 29 nur das Jahr eingegeben zu werden, ansonsten erfor- 29 0 A 


dert das Programm auch noch die Angabe des ge- 
16. Gruendonnerstag 17. Karfreiwünschten Monates. a Be etael für den März 1923: 


onat? 3 
20. Osternont Jahr? 1923(ENTER) 


xkk MAI 19gBeim Jahresausdruck muß, nachdem die ersten 6 Mo- BER 1987 xxx 


en nn a a I nate gedruckt sind, das Blatt an den Anfang zurück- en 
NONTAG DIENSTAG MITTWOCH DomersıßCdreht und eine Taste gedrückt werden, us umuu DONNERST FREITAG SAMSTAG SONNTAG 
13 2 138 
4 5 6 7 8 9 10 88 2 3 4 5 6 7 8 
11 12 13 14 15 16 17 9 10 1 12 13 14 15 
18 19 20 21 2 23 24 16 17 18% 19 4) 2 238 
25 26 27 2833 29 30 3 23 24 25 26 27 28 29 38 
30 
1. Maifeiertag 10. Muttertag 28. Christi Himaelfahrt 1. Allerheiligen 2. Allerseelen 18. Bus und Bettag 
22. Totensontag 29. 1.Advent 
xkk JUNI 1987 *kk x** DEZEMBER 1987 X+X 
NONTAG DIENSTAG NITTWOCH DONNERST FREITAG SANSTAG SONNTAG MONTAG DIENSTAG MITTWOCH DONNERST FREITAG SANSTAG SOANTAG 
1 2 3 4 5 6 ı2 1 2 3 4 5 6 3 
BR; 9 19 11 12 13 14 7 8 9 10 1 12 43 38 
15 16 ms 183% 19 20 21 14 15 16 17 18 19 20 33 
22 23 24 25 26 27 28 21 2 23 us Su % 2 
29 30 28 29 30 31 38 
7. Pfingstsonntag 8. Pfingsteontag 6. 2.Advent 13. 3.Advent 20. 4.Advent 24. Heiliger Abend 
17. Gesetzlicher Feiertag 18. Fronleichnan 25. 1.Weihnachtstag 26. 2.Weihnachtstag 31. Silvester 2» 
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LISTING 


Dei X = 5 2 2 5 2 2 5 2202020502 02008 0200802020802 0&02020002 0200 


12 *#= IMMERWAEHRENDER KALENDER * 
ı1a '’* VON * 
16 ’* AUDOLF BODINGER #* 
18 ’* FUER * 
20 ’* SCHNEIDER AKTIV * 
22 '#* CPC 464/664/6128 * 


24 MRRRRRHRRHRRRRHRRRHRISRRRISHEIETTNN 
26 ° 

30 ’Variablenliste 

32 *ali)=Anzahl der Tage je Monat 
34 'b$= Monat und Jahr 

36 ’d$=Druckabfrage 

38 ’m,j=-Datum (Monat, Jahr) 

40 °31-3j4=Jahresberechnung 

42 °3$=Druckabfrage fuer Jahresausd 


44 "m$=Monatsname 
46 ’mm,q,qi,y=Zaehler fuer Tabs 
48 ’0os$=Feier- bzw. denkwuerdige Ta 


50 ”’s=Anzahl der Tage des jeweilige 

n Monats 

52 "t=Gesamtzahl der Tage ab Jahres 

datum-1800 bzw. -1900 

54 't2=Daten zur Bestimmung von Ost 

ern 

56 "'text$=feiert$+feiert1$ (Stringl 

aenge der Feiertage je Zeile) 

58 ’w=-Tag am Monatsersten 

60 '"w$=Tagesname 

62 

70 ’Die uebrigen Variablen zur Best 
immung der Feiertage sind 

72 "aus den Namen der Feiertage ers 
ichtlich. 

74 'Z.B.: 
stnacht 

76 ’kar=-Karfreitag, karm=Monat in d 

em Karfreitag faellt. 

78 

80 ’Zur Beachtung: Kalenderausgabe 

ohne Feiertage ab 1800 bis 2099 

82 ’Kalenderausgabe mit Feiertagen 

ab 1900-2099 

84 Nach Kalenderausgabe eine Taste 
druecken um zur Neueingabe zurueck 
zukehren 

B6 ’Fin Jahresausdruck passt auf ei 

ne DIN A4 Seite. Nachdem die ersten 
sechs 

85 ’Monate gedruckt sind, haelt der 
Drucker um die Seite an den Anfang 
zurueck- 

90 ’zudrehen. Anschliessend eine Ta 
ste druecken um Druckausgabe fortzu 
setzen. 

92 

94 "Zeilen mit Druckanweisungen sin 

d mit "444° (Doppelkreuzen) versehe 


fa=Tag, fam=Monat fuer Fa 


n 
96 "um das auffinden der Zeilen bei 
Druckeranpassung zu erleichtern. 

98 "#RR#H#RHH Programmbild ###### 


100 BORDER 10:MODE 1 
110 WINDOW#1,4,37,4,22 

120 TAG:FOR i=8 TO 40 STEP 32:MOVE 

i,i:DAAWR 0,399-i#2,1:DRAWR 639-i*2 
‚0,1:DRAWR 0,-399+1*2,1:DRAWR -639+ 
i1#3,0,1:NEXT:TAGOFF 

130 INK 0,0:PAPERf1,1:PEN#1,0:CL5#1 
140 LOCATE 2,2:PRINT STAING$( 38, "*" 
) 

150 FOR i=3 TO 23:LOCATE 2,i:PRINT" 
#" NEXT 

160 FOR i=-3 TO 23:LOCATE 39,i:PRINT 
"20 .NEXT 

170 LOCATE 2,24:PRINT STRING$( 38, "* 


175 TAG:MOVE 160, 148:DRAWR 0, 100,0: 
DRAWR 300,0,0:DRAWR 0,-100,0:DRAWR 
-300,0,0 

180 TAGOFF:LOCATE#1,10,9:PARINT#1,"I 
mmerwaehrender"” 

185 LOCATE#1,10,11:PRINT#1,"K AL E 
NDE RAR” 

190 FOR I=1 TO 3000:NEXT:INK 1,26,2 
:FOR I=1 TO 3000:NEXT:INK 1,26 

200 ’###### Kalenderprogramm #####%# 
210 CLEAR:MODE 1:DIM al 12) ,m$( 12) 

220 WINDOW#1,4,37,4,22:PAPER#1,0:PE 

N#1,1:CL5#1 

230 LOCATE#1,6,4:PAINT#1,"Wenn Ausg 

abe auf Drucker" 

240 LOCATE#1,6,6:PRINT#1,"erwuensch 
t, Drucker klar" 

250 LOCATE#1,5,8:PRINT#1,"machen un 
d Taste j drucken,” 

260 LOCATE#1,9, 10:PRINT#1,"andernfa 
ils Taste n." 

270 d$=INKEY$:IF d$<>"j"AND d$<>"n" 
THEN 270 

280 IF d$<>" jJ"THEN 330 

290 PRINT#8,CHR$( 27) ;"A";CHR$(5); ” 

HHHHHHHHHH Zeilenvorschub 

295 WIDTH 132 

300 LOCATE#1,9,14:PRINT#1,"Jahresau 
sdruck? j/n" 

310 j$=INKEY$:IF j$<>"J"AND j$<>"n" 

THEN 310 

320 "seuneesueenee Datumeingabe #** 

RHEIN IE 

330 CL541 

340 LOCATE#1,6,4:PRINT#1,"Geben Sie 
das Datum ein!"”:IF j$="3j"”THEN m=1: 

GOTO 380 

350 LOCATE#1,6, 10:PRINT#1, "Monat" 
360 LOCATE#1,12,10:INPUT#1,m 

370 IF m>12 OR m<=D THEN GOSUB 1120 
:GOSUB 1130:CL5#1:G0TO 340 
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380 LOCATE#1,6,12:PRINT#1,"Jahr" 
390 LOCATE#1,12,12:INPUT#1,J 

400 IF j<1800 OR j>2099 THEN GOSUB 
1120:G605UB 1140:L0CATE#1,12,12:PRIN 
T41,5SPC(6) :G0OTO 380 

410 j4=3j-1900: j=j-1800 

420 IF 3j/4=j\4 AND 3/100<>j\100 TH 
EN j3=4 ELSE j3=5 

430 IF j=200 THEN 33=4 

440 MODE 2:PAPER 0O:PEN 1:PAPER#1,1: 
PEN#1,0:a( 1)=31 

450 IF j3=4 THEN al2)=29 ELSE a(l2)= 
2B’###%## wenn Schaltjahr dann Feb.= 
29 T. ### 

460 al 3) =31:a( 4) =30:al5)=-31:al 6) =-30 
:3(7)=31:a( 8) =31:a(9) =30:al 10)=31:a 
( 11)=30:a( 12) =31 

470 FOR i=1 TO m:IF i<m THEN s=st+ta( 
i) 

480 IF i=m THEN 500 

490 NEXT 

500 z=ali) #raueeeuueneeee gesuchte 
r Monat ##Hrereneee 

510 j=j-1:31=3\4-3\100:jJ2=3j-31'##* 
Anzahl der Schalt jahre=j\4-3j\100 #*# 
# 


520 t=t+3j1*366+Jj2*365+5s 

530 IF j=199 THEN t=t+1’*### Das Jah 

r 2000 ( 1800+199+1) ist Schalt jahr 

a 

540 w=t+1-( INT(t/7)*7) 

550 LOCATE 2,2:PRINT STRING$( 78,CHR 

$(227)) 

560 LOCATE 2,24:PRINT STRING$( 78,CH 

R$C227)) 

570 FOR f=2 TO 23:L0OCATE 2,f:PRINT 
CHR$( 227) :NEXT 

580 FOR f=2 TO 23:LOCATE 79,f:PRINT 
CHR$L 227) : NEXT 

590 LOCATE 3,6:PRINT STRING$( 76, 154 
) 

600 IF 3j4>=0 THEN GOSUB 1190 
erechnung der Feiertage *### 

610 RESTORE 1170 

620 FOR k=1 TO m:READ m$(k) :NEXT 

630 k=m:m$=m$( k) 

640 WINDOW#1,4,77,3,5 

650 b$=-"### "+m$+" "+STA$L J+1801) +" 
aan" 

660 o=( 74-(LEN(b$))) /2:03=( 39-C LEN( 
b$)))/2 

670 CLS#1:LOCATE#1,0,2:PRINT#1,b$:1I 
F d$<>"j"THEN 720 

680 PRINT#8,CHRA$(27)+"E";:IF m<=6 T 
HEN PRINT#8,TAB( 03)b$ ELSE PRINT#8, 
TAB( 03+40) 6b$ AHHHHHHHHH CHRSC27)+"E 
"=Doppeldruck kann entfallen 

690 PRINT#8,CHR$( 27) +"F"; "AHHHHHHHH 
# Doppeldruck aus 


‚as B 


2+3) STRING$(61,"-") HHRHHHHHHH Komp 
rimierten Druck einschalten und unt 
erstreichen 

720 RESTORE 1160:q-B:q1=-2+qg2 

730 FOR i=1 TO 7:READ w$(i) 

740 LOCATE q,7:PRINT w$(i) 

750 IF d$=" j"THEN PRINT#8, TAB( q1)w$ 
(Ci); AHHHHHHHHH Ausdruck Wochentage 
760 q=qg+10:q1=q1+9 

770 NEXT 

780 L.OCATE 3,8:PRINT STRING$( 76, 154 


) 

790 IF d$="j"THEN PRINT#8,TAB(q2+2) 
STRING$(61,"-") "AHHHHHHHHH unterstr 
eichen 

800 mm=5:y=-10:q=30+(w*10) :q1=22+q2+ 
(w#9) :IF q>70 THEN q=q-70 

810 IF qi>q2+63 THEN q1i=q1-63 

820 FOR i=1 TO z 

830 IF 3j4>=0 THEN GOSUB 1500 

840 IF 0s$<>""THEN LOCATE q-1,y:PRI 
NT CHR$(24) ;" "; :PRINT USING"##” ;i; 
:PRINT " ";CHRA$L24) ELSE LOCATE q,y 
:PRINT USING"#4";i 

850 IF d$<>"jJ"THEN 900 

870 IF 0s$<>""THEN PRINT#8,TAB(q1)U 
SING"#4";i; :PRINT#8,” ##";:GOTO 900 
HHHHHHHH 

880 PRINT#8,TAB(q1)USING"A#";i; "AHA 
HHHHRUH 

900 IF os$=""THEN 950 
910 text$=text$+"” 
text$)>=61 THEN 930 
920 feiert$=feiert$+STA$l i)+"”. "+tos 
$+”" ":0s$="":GOTDO 950 

930 feiert1$=feiert1$+STRA$li)+"”. "+ 
os$+" ":0s$="" 

940 IF i=z THEN 970 

950 q=q+10:q1=q1+9:IF q>70 AND NOT 
i=z THEN q=10:y=-y+t2:q1=q2+4 :mm=mm+ 1 
960 NEXT 

970 IF d$<>"J"THEN 990 

980 IF mm<11 THEN PRINT#B:mm=mm+1:6G 
OTO 980 HAHHAHHRHAH NT setzen 

990 IF feiert$=""THEN 1050 

1000 o-( 80-(LEN( feiert$)))/2:LOCATE 
0,22:PRINT CHR$( 24) ;feiert$; CHA$(2 
4) 

1010 01=(62-(LEN( feiert$)))/2:IF d$ 
="4"THEN PRINT#8,TAB(o1+q2) feiert$: 

mmsmm+ 1 HHHHHHHHHR 

1020 IF feiert1$=""THEN 1050 

1030 o=( 80-(LEN( feiert1$))) /2:LOCAT 
E 0,23:PRINT CHRA$( 24) ;feiert1$;CHR$ 
(24) 

1040 o1=(62-(LEN( feiert1$)))/2:IF d 
$="J"THEN PRINT#8,TAB( o1+q2) feiert 1 
$:mmamm+ 1  AHHHRRRHHH 

1050 IF d$="3j"AND mm<14 THEN PRINT# 


"+0os$:IF LEN( 


B:mm=mm+1:G0TO 1050 HAHHHHHHRE VT s 3) 
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700 PRINT#8,CHR$( 15) ; :PRINT#8, TAB(q 


| LISTING 


etzen 
1060 feiert$="":feiert 1$=-"":text$=" 


1070 IF 3$<>"”3j"”THEN 1110 

1080 IF m>=6 AND j$="J"THEN q2=68:q 
1=2 

1090 IF m=6 AND j$="jJ"THEN LOCATE 3 

0,25:PRINT”"eine Taste druecken” :CAL 

L &BBO6 

1100 CLS:m=m+1:3j=j+1:s=0:t=0:z=D:IF 
m<13 THEN 470 

411310 LOCATE 30,25:PRINT"”eine Taste 
druecken"”:CALL &BB06:60T0 210 

1120 PRINT#1,CHR$C7) :LOCATE#1,3, 16: 
PRINT#1,"Eingabe falsch! Neue Einga 

be!" :RETURN 

1130 LOCATE#1,7,18:PRINT#1,"Jahr ha 
t nur 12 Monate!":GOTO 1150 

1140 LOCATE#1,4,18:PRINT#1,”Nur 180 
O0 bis 2099 zulaessig” :RETURN 

1150 FOR x=1 TO 2000:NEXT:RETURN 
1160 DATA MONTAG,DIENSTAG, MITTWOCH, 

DONNERST, FREITAG, SAMSTAG, 50NNTAG 
1170 DATA JANUAR, FEBRUAR, MAERZ,APRI 

L,MAI,JUNI,JULI,AUGUST, SEPTEMBER, OK 
TOBER, NOVEMBER, DEZEMBER 

1180 ’###### Berechnung der von Ost 
ern bestimmten Feiertage #FH#### 
1190 RESTORE 1780 

1200 FOR b=0 TO 298:READ t2 

1210 IF b=j4 THEN 1230 

1220 NEXT 

1230 os=t2:hi=os-22:pf=os-12:fro=os 
-1:osm=-3:him=-5:pfm>5:from=5 

1240 IF os>31 THEN os=os-31:o0sm=4 
1250 osi=-os+1:osim=-osm:IF osi>31 TH 

EN osi=1:osim=4 

1260 IF hi>31 THEN hi=hi-31:him=6 
1270 IF pf>31 THEN pf=pf-31:pfm=6 
1280 IF fro>31 THEN fro=fro-31:from 
=6 

1290 pfi=pf+1:pfim=pfm:IF pfi>31 TH 

EN pfi=1:pfim=6 

1300 gru=os-3:grum=osm:IF gru<=D TH 
EN grum=osm-1:gru=( 31+os) -3 

1310 kar=os-2:karm=osm:IF kar<=0 TH 
EN karm=osm-1:kar>( 31+os) -2 

1320 fa=os:fam=osm:FOR b=1 TO 47’'*# 
“#4 Anzahl der Tage von Fasch.-Ost 
ern F###H#% 

1330 fa=fa-1:IF fa<i AND fam=4 THEN 
fa=31:fam=3:G0OTO 1350 

1340 IF fa<1 AND fam=3 THEN fa=a(l2) 
:fam=2 

1350 NEXT 

1360 as=-fa+rl:asm=fam:IF as>al 2) THEN 
as=1:asm=-famt1 

1370 mut=( 12-w) +7:mum=5:IF mut>14 T 
HEN mut=mut-7? 

1380 IF m<11 THEN RETURN 


1390 IF m=12 THEN 1460 

1400 a=-6:bu=-16:FOR b=1 TOD 7 

1410 IF a=w THEN 1440 

1420 a=-a-1:bu=bu+1 

1430 NEXT 

1440 tos=bu+4:tom=11:bum=11:IF tost 
7<=30 THEN ad=tos+7:adm=bum 

41450 GOTO 1480 

1460 adi=(5-w)+21:IF adi>24 THEN ad 
i=-adi-? 

1470 adma=12:ade=adi-7:ada=ade-7:IF 
ada>? THEN ad=ada-? 

1480 RETURN 

1490 seernennenueeitet Feiertage * 
NENNEN 

1500 IF i=1 AND m=1 THEN os$="Neuja 
hr” :RETURN 

1510 IF i=6 AND m=1 THEN os$="Heili 
ge drei Koenige" :RETURN 

1520 IF i=fa AND m=fam THEN os$="Fa 
stnacht" :RETURN 

1525 IF i=14 AND m=2 THEN 0os$="Vale 
ntinstag” :RETURN 

1530 IF i=as AND m=asm THEN os$="As 
chermittwoch"” :RETURN 

1540 IF i=gru AND m=grum THEN os$=" 
Gruendonnerstag"” :RETURN 

1550 IF i=kar AND m=karm THEN os$=" 

Karfreitag” :RETURN 

1560 IF i=os AND m=osm THEN os$="0s 
tersonntag"” :RETURN 

1570 IF i=osi AND m=osim THEN os$=" 
Ostermontag"” :RETURN 

1580 IF i=mut AND m=mum THEN 0s$="M 
uttertag"” :RETURN 

1590 IF i=1 AND m=-5 THEN os$="Maife 
iertag” :RETURN 

1600 IF i=hi AND m=him THEN 0os$="Ch 
risti Himmelfahrt" :RETURN 

1610 IF i=pf AND m=pfm THEN os$="Pf 
ingstsonntag" :RETURN 

1620 IF i=pfi AND m=pfim THEN os$=" 

Pfingstmontag” :RETURN 

1630 IF i=fro AND m=from THEN os$=" 

Fronleichnam” :RETURN 

1640 IF i=17 AND m=6 AND 3j>160 THEN 
os$="Gesetzlicher Feiertag” :RETURN 
1650 IF i=1 AND m=-11 THEN 0os$="Alle 
rheiligen"” :RETURN 

1660 IF i=2 AND m=-11 THEN os$="Alle 

rseelen"” :RETURN 

1670 IF i=bu AND m=11 THEN os$="Bus 
und Bettag” :RETUAN 

1680 IF i=tos AND m=tom THEN os$="T 

otensontag"” :RETURN 

1690 IF i=ad AND m=adm THEN os$="1. 

Advent” :RETURN 

1700 IF i=ada AND m=adma THEN os$=" 

2.Advent” :RETURAN 

1710 IF i=ade AND m=-adma THEN os$=" 
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3.Advent" :RETURN 

1720 IF i=adi AND m=adma THEN os$=" 
4.Advent"” :RETURN 

1730 IF i=24 AND m=12 THEN os$="Hei 
liger Abend” :RETURN 

1740 IF i=25 AND m=12 THEN os$="1.W 
eihnachtstag"” :RETUAN 

1750 IF i=26 AND m=12 THEN os$="2.W 
eihnachtstag” :RETURN 

1760 IF i=31 AND m=12 THEN os$="Sil 
vester"” :RETURN 

1770 RETUAN 

1780 DATA 46,38,30,43,34,54,46,31,5 
0,42,27,47,38,23,43,35,54,39,31,51, 
35,27 

1790 DATA 47,32,51,43,35,48,39,31,5 
1,36,27,47,32,52,43,28,48,40,24,44, 
36,56 

1800 DATA 40,32,52,37,28,48,40,25,4 
4,36,49,41,32,52,37,29,48,33,53,45, 
29,49 

1810 DATA 41,26,45,37,29,42,33,53,4 
5,30,49,41,26,46,37,50,42,34,53,38, 
30,50 

1820 DATA 34,26,46,31,50,42,34,47,3 
8,30,43,35,54,46,31,51,42,27,47,39, 
23,44 

1830 DATA 35,55,39,31,51,36,27,47,3 
2,52,43,35,48,40,31,51,36,28,47,32, 
52,44 

1840 DATA 28,48,40,25,44,36,56,41,3 
2,52,37,29,48,40,25,45,36,49,41,33, 
52,37 

1850 DATA 29,49,33,53,45,30,49,41,2 
6,46,37,29,42,34,53,45,30,50,41,26, 
46,38 

1860 DATA 50,42,34,54,38,30,50,35,2 
6,46,31,51,42,34,47,39,30,43,35,55, 
46,31 

1870 DATA 51,43 


SPRINGER 


Daß die einfachsten Spielideen oftmals die besten 
sind, beweist Michael Köthe mit seinem Programm 
„Springer“. Wie der Name schon sagt, beruht das 
Prinzip auf dem Zugverlauf der Springer-Figur aus 
dem Schachspiel. Lassen Sie sich von dem unkompli- 
zierten Regeln und dem leichten Verlauf des Spiels 
zu Beginn nicht täuschen. Sehr schnell wird sich Ihre 
SPAINESEHgUr in einer ausweglosen Situation be- 
inden. 


SPRINGERTOUR 


BEE HENEE 
BENE:EHEN 
t 

EEE EHEN 
Ä | 
THAT 
! 
E BEE EN 
| 

BEE BEE 
| 


ABCDEFGH 


- ma a Mm SR 


Spielregeln: 


Sie müssen mit der Springer-Figur möglichst jedes 
Feld des Spielbrettes einfärben, indem Sie einmal 
darauf springen. Danach kann dieses Feld nicht mehr 
berührt werden. Die Bewegungsmöglichkeiten ent- 
sprechen denen des Schachspieles. Das heißt, die 
Figur darf sich um jeweils ein Feld weiterbewegen, 
auch in der diagonalen Richtung. Achten Sie darauf, 
daß Sie für die ungünstigsten Positionen in den Ecken 
immer einen Ausweg offen haben. 
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| . RHHHHHHHHHRRRRHHHRRSHHHRREE NH 
2% SPRINGER # 
3 '% VON #* 
4 3» "M.KDETHE * 
5 + FUER * 
6 '* SCHNEIDER AKTIV * 
7 '% CPC 464/664/6128 * 
8 RHEIN TE 
10 MODE 1 


20 WINDOW#1,33,38,4,19 

30 INK 2,18: INK 3, 12 

40 DIM feld( 11, 11), speicher( 64,2) 
50 i=2: FOR x=1 To 8: waag( x)=i:i=-i+2 
:NEXT 

60 i=18:FOR x=1 TO B:senk(x)=-i:i-i- 
2:NEXT 

70 * ++ Springer ++ 

80 SYMBOL 241,0,0,3,7,13,31,23,5 
90 SYMBOL 242,0,0, 192, 224, 240, 240, 2 
40,240 

100 SYMBOL 243,1,1,3,7,3,7,0,0 

110 SYMBOL 244, 240, 224, 240, 248, 240, 
248,0,0 

120 ” ++ Spielfeld ++ 

130 SYMBOL 255,255,255,255,255,255, 
255,255,255 

140 ” ++ betr. Feld ++ 

150 SYMBOL 245,255, 128, 128,128, 128, 
128, 128, 128 

160 SYMBOL 246,255,1,1,1,1,1,1,1 
170 SYMBOL 247,128, 128, 128, 128, 128, 
128, 128,255 

180 SYMBOL 248,1,1,1,1,1,1,1,255 
190 * ++ Stringzuweisung ++ 

200 spiel$=STRAING$( 2,255) +STRING$(2 
‚8) +CHR$( 10) +STAING$( 2,255) 

210 sp$=CHA$( 241) +CHA$( 242) +STRING$ 
(2,8) +CHA$( 10) +CHR$[ 243) +CHR$L 244) 
220 bf$=CHR$( 245) +CHR$( 246) +5STRAING$ 
(2,8) +CHA$( 10) +CHA$( 247) +CHA$( 248) 


LOCATE 14,1:PRINT"SPRINGERTOUR" 
PLOT 12,354,2:DRAW 12,92 
PLOT 12,354:DRAW 274,354 


230 
240 
250 


260 PLOT 12,92:DRAW 274,92 

270 PLOT 274,354:DRAW 274,92 

280 zug=0 

290 FOR i=1 TO 64 

300 speicher(i,1)=O:speicher(i,2)=-O0 
310 NEXT 

320 ende=DO 

330 LOCATE 1,25:PRINT SPACE$( 39); 
340 a=ı 

350 FOR y=4 TO 19 STEP 2 

360 FOR x=2 TO 17 STEP 2 

370 IF a MOD 2=0 THEN PEN 3 ELSE PE 
N2 

380 LOCATE x,y 

390 PRINT bf$; 


a=satl 

NEXT 

IF a MOD 2=0 THEN a=1 ELSE a=2 
NEXT 

PEN 1 

TAG 

MOVE 25,78:PRINT'TABCDEFG 


400 
410 
420 
430 
440 
450 
460 
H”; 

470 
450 
490 
500 
510 
520 
530 
540 
550 
560 
570 
580 


x=B 

FOR i=338 TO 88 STEP-32 

MOVE 280,i 

PRINT x; 

x=x-1 

NEXT 

PEN 1 

FOR x=2 TO 9 

FOR y=2 TO 9 

feld(x,y)=1 

NEXT y,x 

TAGOFF 

590 LOCATE 2,24:PRINT”DEMO (J/N)"; 
600 h$=UPPER$( INKEY$) :IF h$="J" THE 

N 1700 ELSE IF h$="N"” THEN 610 ELSE 
600 

610 LOCATE 2,24:PRINT"” r> 
620 LOGATE 2,1:PRINT sp$ 

630 

640 

650 

660 LOCATE 1,25:PRINT"Anfangsfeld:" 


ANFANGSFSFELD 


’ 

670 h$=INKEY$:IF h$="" THEN 670 

680 end1=ASC( h$) :IF end1<91 THEN en 
di=end1-64 ELSE end1=end1-96 

690 IF endi<1 OR end1>8 THEN PRINT 
CHR$( 7) ; :GOTO 670 

700 LOCATE 16,25:PRINT UPPER$(h$) ; 
710 h1$=INKEY$:IF h1$="" THEN 710 
720 end2=VAL(h1$) :IF end2<1 OR end2 
>8 THEN PRINT CHR$(7);:6G0OTO 710 

730 1.OCATE. 17,25:PRINT end2; 

740 PEN D:LOCATE 2,1:PAINT spiel$:P 
EN 1 

750 GOSUB 1510 

760 LOCATE 1,25:PRINT SPACE$( 12); 
770 


780 ° EINGABE 
790 
800 LOCATE 1,25:PRINT USING"##. ";z 


ug+1; :PRINT”Feld:"; 

810 h$=INKEY$:IF h$="" THEN 810 

820 end1=ASC( h$) :IF endi1<91 THEN en 
di1=end1-64 ELSE endi=end1-96 

830 IF endi<1 OR endi1>B THEN PRINT 
CHR$( 7); :G60TD 810 

840 LOCATE 16,25:PRINT UPPER$(h$); 
850 h1$=INKEY$:IF h1$="" THEN 850 
860 end2=VAL(h1$) :IF end2<1 OR end2 
»8 THEN PRINT CHRA$(7);:GOTO 850 

870 LOCATE 17,25:PRINT end2; 
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880 
890 
900 
910 


GOTO 1320 

GOSUB 1510 

IF zug-64 THEN 970 

GOSUB 1420 

920 IF ende=1 THEN 970 

930 GOTO 800 

940 * 

950 ° 
960 * 
970 IF zug<64 THEN 1010 

980 L.OCATE 1,25:PRINT"Gratuliere - 

Beschafft"” 

990 FOR za=1 TO A4000:NEXT 

1000 GOTO 1030 

4010 LOCATE 1,25:PAINT"Leider nicht 
geschafft"; 

1020 FOR za=1 TO 4000:NEXT 

41030 CLS#1:LOCATE 1,25:PRINT SPACE$ 
(39) ;:LOCATE 1,25:PAINT"Ausdruck (J 
/N”; 

1040 h$=INKEY$ 

41050 IF h$="n" THEN 1090 

1060 IF h$="3" THEN 1080 

1070 GOTO 1040 

1080 GOSUB 1170 

41090 LOCATE 1,25:PRINT"Noch einmal 


Ende 


(J/N)” 

1100 h$=INKEY$ 

4110 IF h$="n" THEN ECLS:END 
1120 IF h$="3j" THEN RUN 
1130 GOTO 1100 

1140 ° 

1150 ° Ausdruck 

1160 ° 

41170 FOR i=1 TO zug 


1180 PRINT#1,USING"##. ";i; 
1190 PRINT#1, CHR$C speicher(i,1) +64 
);USING”#";speicher(i,2); 


1200 IF i/13<>i\13 THEN 1240 

1210 PRINT#1:PRINT#1,”" TASTE”; 
1220 h$=INKEY$:IF h$="" THEN 1220 
1230 CLS#1 

1240 NEXT 

1250 PRINT#1:PRINT#1,"” TASTE”; 


1260 
1270 
1280 
1290 
1300 


h$=INKEY$:IF h$="" THEN 1260 
CLS5#1 

RETURN 

[4 


*Veberpruefung richtige Eingab 


e 

1310 

1320 LOCATE 16,25:PRINT" ”s 

1330 IF feld(end1+1,end2+1)<>1 THEN 
PRINT CHRA$( 7); :GOTO 800 

1340 IF endi=anf1-1 AND (end2=anf2- 

2 OR end2=anf2+2) THEN 890 

1350 IF endi=anfi+1 AND (end2=anf2- 

2 OR end2=anf2+2) THEN 890 

1360 IF endi=anf1-2 AND (end2=anf2- 
4 OR end2=anf2+1) THEN 890 


1370 IF endi=anf1+2 AND (end2=anf2- 
4 OR end2=anf2+1) THEN 890 

1380 PRINT CHR$( 7); :GOTO 800 

1390 

1400 ’Ueberpr. ob weitere Zuege moe 
glich 

1410 


1420 IF feld(anf1,anf2-1)=1 OR feld 
(anfi,anf2+3)=1 THEN 1470 

1430 IF feld( anfi1+2,anf2-1)=1 OR fe 
Id(anfi1+2,anf2+3)=1 THEN 1470 

1440 IF feld(anfi-1,anf2)=1 OR feld 
(anf1+3,anf2)=1 THEN 1470 

1450 IF feld(anfi1-1,anf2+2)=1 OR fe 
ld( anf1+3,anf2+2)=1 THEN 1470 

1460 ende=1 

1470 RETURN 

1480 ° 
1490 
1500 
1510 


"ZUEGE SETZEN 
. 


LOCATE 16,25:PRINT” ”- 

1520 zug=-zug+1 

1530 PRINT#1,USING"”##. ";zug; :PRINT 
#1,UPPER$Ch$) ;USING”#";end2; 

1540 IF (anfi1 MOD 2=0 AND anf2 MOD 
2=0) OR (anfi1 MOD 2=1 AND anf2 MOD 
2=1) THEN PEN 3 ELSE PEN 2 

1550 IF zug=1 THEN 1580 

1560 LOCATE waagl( anfi),senk( anf2) 


1570 PRINT CHRA$( 22) CHR$C 1) sp$CHR$L 2 
2) CHR$( 0) 

1580 anf1=end1:anf2=end2 

1590 feld( anfi+1,anf2+1)=2 

1600 speicher( zug, 1)=anf1:speicherf( 
zug,2)=anf2 

1610 IF (anfi1 MOD 2=0 AND anf2 MOD 

2=0) OR (anfi1 MOD 2=1 AND anf2 MOD 

2=1) THEN PEN 3 ELSE PEN 2 


1620 LOCATE waagl( anfl), senk( anf2) :P 
ARINT spiel$:PEN O 

1630 LOCATE waagl anf), senk( anf2) 
1640 PRINT CHR$( 22) CHRA$C 1) sp$CHA$L 2 
2) CHR$( 0) 

1650 PEN 1 

1660 RETURN 

1670 * 

1680 ° DEMO 

1690 * . 
1700 LOCATE 2,24:PRINT” ”. 
1710 PEN#1,O 

1720 RESTORE 1830:READ vv$ 


1730 FOR i=1 TO 128 STEP 2 

1740 end1=VAL(MID$[ vv$,i,1)) :end2=V 
AL(MID$Cvv$,i+1,1)) 

1750 h$=CHRA$( end 1+64) 

1760 GOSUB 1510 

1770 FOR za=1 TO 400:NEXT za 

1780 NEXT i 

1790 FOR za=1 TO 2000:NEXT 
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1800 CLS#1 

1810 PEN#1,1 

1820 GOTO 280 

1830 DATA "112315274867887684725132 
1325173857788674826 1536546345536446 
342213341628173857758371826 14224335 
566445665475837 152311224 1628476887" 


AKTIV COMPUTERN 
MIT 
SCHNEIDER 
AKTIV 


HEX-BIN- 
DEZ-WANDLER 


Schneider aktiv startete im Heft 3/87 die neue Serie 
der Maschinensprache-Programmierung für die CPC- 
Computermodelle. Ein großes Problem für jeden Ein- 
steiger ist die Umwandlung von Dezimal- oder Binär- 
zahlen in das — für die Assemblerprogrammierung 
wichtige — Hexadezimalsystem. Zwar wurde die Theo- 
rie erklärt und geübt, doch die Arbeit bleibt und die 
sollte man dem Computer überlassen. Eine wesentli- 
che Erleichterung für derartige Um- und Rückwand- 
lungen bringt das Programm von Manfred Hallhuber. 


Programmbeschreibung: 
Bequeme Eingabe der Werte 


Zuerst wird nach dem gewünschten Bildschirmmodus 
gefragt. Die Eingabe wurde dabei jedoch wegen der 
besseren Übersichtlichkeit auf Modus 1 und Modus 2 
begrenzt. 
Anschließend können Sie die Zahlen in DEZ-, HEX- 
oder auch in BINÄR-Form eingeben. Das Programm 
wandelt jedoch nicht nur eine Zahl in die gewünschte 
andere Darstellungsart um, sondern es besteht auch 
noch die Möglichkeit, durchdie Eingabe einer ‚‚Start- 
zahl‘ und einer „Endzahl‘ eine Tabelle zu erstellen, 
in der immer alle drei Darstellungsarten verwendet 
werden. Deshalb werden Sie vom Programm 'auch 
noch gefragt, ob nur eine Zahl umzuwandeln ist 
oder ob eine Tabelle gewünscht wird. Die Ausgabe 
dieser Tabelle kann im Zahlenbereich von 1 bis 65553 
erfolgen. ’ 
Um die richtige Verarbeitung durch das Schneider- 
Betriebssystem zu gewährleisten, müßten eigentlich 
die HEX-Zahlen bei der Eingabe mit dem Sonderzei- 
chen “&‘“ oder “&H“ bzw. die Binär-Zahlen mit dem 
Sonderzeichen “&X“ gekennzeichnet werden. Dieses 
Programm ergänzt jedoch von sich aus die eingegebe- 
nen Zahlen um diese Sonderzeichen, so daß sich die 
Zahleneinzabe für den Benutzer wesentlich verein- 
acht. 
Die Ausgabe der Tabelle erfolgt auf Wunsch natürlich 
auch auf dem Printer. 


1. BRRRHRRHRRRHRSBRISESSBISESISIESEIESESESESEN 
2 8 HEX-BIN-DEZ-WANDLER * 
3 '% VON * 
a 8 MANFRED HALLHUBER * 
5: FUER * 
6 '* SCHNEIDER AKTIV * 
7 8 CPC 464/664/6128 * 
B 1 RRRRRRRRRHRRHISISHRIESIRRIRIEIRIHIEIESERIENE 


1D CLEAR:MODE 1:0N ERROR GOTO 740 
20 PRINT CHR$( 24) :PRINT"## HEX — BI 
N - DEZ - WANDLER by H.M. ##":PRINT 
CHR$( 24) :PRINT 

30 PRINT:PRINT" > Im Bereich von 
I bis 65535 <":PRINT:PRINT 

40 EVERY 5,2 GOSUB 720 

50 PRINT: PRINT:PRINT:PRINT"In welch 

er MODE soll gearbeitet werden?”:PR 
INT:PRINT,CHR$( 24) +"”( 1/2) "+CHR$( 24) 
:CALL EBBO6:IF INKEY(6A4)=(0) THEN m 

o=1 ELSE mo=2 

60 MODE(mo) :PRINT,"Nur 1 Zahl umwan 
deln oder Tabelle? "+CHR$[ 24) +"( 1/T 

) "+CHR$( 24) :CALL 6BBO6: IF INKEY( 64) 
=0 THEN‘490 ELSE 70 

70 CLS:wa$=CHRA$( 24) +"###* Ausgabe in 
Tabellenform ##*#"+CHRA$( 24) :PRINT w 

8$:PRINT : PRINT 

80 PRINT"Eingabe in DEZ oder HEX od 
er BIN":PAINT:PRINT"Taste ( D oder 
H oder B ) druecken"”:CALL 6&BBO6:IF 
INKEY(61)=0 THEN 120 

90 IF INKEY(44)=D THEN 240 


100 IF INKEY(54)=0 THEN 360 

110 GOTO 70 

120 MODE (mo) :PRINT wa$:PRINT:PRINT 
130 INPUT"Startzahl (DEZ) = ";start 
140 PRINT:PRINT 

150 INPUT"Endzahl (DEZ) = ";endza 
hl 

160 PRINT hi 

170 PRINT"Ausgabe auf dem Printer? 


( j/n)":CALL &8803:CALL &BB06:IF INK 

EY(45)=O THEN ausg=8 ELSE ausg=O 
180 FOR i=start TO endzahl 

190 PRINT 

200 PRINT#(ausg) ‚,i,HEX$(i),BIN$(i) 
210 FOR t=1 TO 400:NEXT 

220 NEXT 

230 PRINT:PRINT"Weiter = eine Taste 
druecken":CALL &6BB03:CALL &BB06:CL 

5:G0TO 10 

240 MODE (mo) :PRINT wa$:PRINT:PRINT 
250 INPUT"Startzahl (HEX) <z.B. 766 
> = ",starthex$:starthex=VAL( "&"+st 

arthex$) 

260 PRINT:PRINT 

270 INPUT"Endzahl (HEX) <z.B. 799 
> = * endzahlhex$:endzahlhex=VAL(["E 
"“+endzahlhex$) 

260 PRINT 
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290 PAINT"Ausgabe auf dem Printer? 
(3J/n)":CALL &8B8B06:IF INKEY(45)-0 TH 
EN ausg=-8B ELSE ausg=-O 

300 FOR i=-starthex TO endzahlhex 
310 PRINT 

320 PRINT#( ausg) ,STA$(i),HEX$(i),BI 
n$Ci) 

330 FOR t=1 TO 400:NEXT 


340 NEXT 
350 PAINT:PRINT"Weiter = eine Taste 


druecken"”:CALL EBB06:CL5:GOTO 10 
360 MODE (mo) :PRINT wa$:PRINT:PAINT 
370 PRINT: PRINT 
380 INPUT"Startzahl (BIN) <z.B. 011 
> = ", startbin$:startbin=VAL( "EX"+s 
tartbin$) 

390 PRINT: PRINT 

400 INPUT"Endzahl (BIN) <z.B. 101 
> = " endzahlbin$:endzahlbin=VAL(["&E 
X"+endzahlbin$) 

430 PRINT 

420 PRINT"Ausgabe auf dem Printer? 
( 3/n)":CALL &6BB06: IF INKEY(45)=0 TH 
EN ausg-B ELSE ausg-O 

430 FOR i=startbin TO endzahlbin 
440 PRINT 

450 PRINT#(ausg) ‚BIN$(i) ,HEX$(i),ST 
R$Ci) 

460 FOR t=1 TO 400:NEXT 

470 NEXT 
480 PAINT:PRINT"Weiter = eine Taste 

druecken":CALL EBB806:CLS5:G60T0 10 
490 MODE( mo) :PRINT CHR$( 24) +"Einzel 
eingabe in DEZ oder HEX oder BIN"+C 
HA$( 24) :PRINT 
500 PRINT:PAINT"Taste ( D oder H od 
er B ) druecken":CALL &BBO6:IF INKE 
Y(61)=D0 THEN 540 
510 IF INKEY(44)=0 THEN 600 


520 IF INKEY(54)=0 THEN 660 
530 GOTO 490 

540 MODE (mo) 

550 PRINT:PAINT CHA$( 24) +"#### DEZ 
-Zahl ####"+CHA$( 24) 

560 PRINT:PRINT:INPUT"Zahl (DEZ) = 

"za 

570 PRINT:PRINT za,HEX$(za) ‚BIN$( za 
) 

580 PRINT 

590 PRINT"Eine Taste oder kleine EN 
TER druecken":CALL &BB03:CALL &BB06 
:IF INKEY(6)=0 THEN 10 ELSE 560 

600 MODE (mo) 

610 PRINT CHA$( 24) +"#### HEX-Zahl 


#E20#"4+CHR$( 24) 
620 PRINT:PRINT:INPUT"Zahl (Hex) <z 
.B. 766> = ",zahex$ 
630 zahex=VAL( "&"+zahex$) 
640 PRINT HEX$( zahex) ‚STA$( zahex) ‚B 
IN$( zahex) 


650 PRINT:PRINT"Eine Taste oder kle 
ine ENTER druecken"”:CALL &BB06:IF I 


NKEY(6)=0O THEN 10 ELSE 620 


660 MODE (mo) 


670 PRINT CHR$( 24) +"###% 


244" 4+CHA$L 24) 


BIN-Zahl 


680 PRINT:INPUT "Zahl (BIN) <z.B. 1 


01> = ",zabin$ 


690 zabin=VAL( "&X"+zabin$) 
700 PRINT:PRINT BIN$( zabin) ‚HEX$( za 


bin) ,‚STA$( zabin) 


710 PRINT:PRINT"Eine Taste oder kle 
ine ENTER druecken":CALL &BBO6:IF I 
NKEY(6)=0 THEN 10 ELSE 680 


IF INKEY (6) 
RETURN 

CLS 

FOR i=1 TO 20 


720 
730 
740 
750 
760 
770 
780 
790 
800 


PRINT CHR$(7) 
NEXT 

GOTO 10 

END 


= 0 THEN 10 


PRINT"!!! Falsche Eingabe I!!!” 


Verkaufe CPC-6128, GT65 u. 
4 Disk., 2 Mon. alt, Gar., da 
keine Lust mehr. CPC höch- 
stens 3-4 Std. gelaufen. 

Preis 650 DM. Eine wirkliche 
Gelegenheit. Herbert Hersing, 
Nr. 55, 3139 Gr.-Gusborn 
Tausche Software f. CPC 464 
auf Kass. od. Disk. Listen an 
Torsten Keller, Füllenkamp 6, 
4300 Essen 14 
Astronomie-CPC aus Eigen- 
entwicklung zu verk. Inhalt: 
Ephemerioen, julian. Datum, 
Messier-Objekte, Studnenwin- 
kel etc. f. 40 DM. Bruno 
Weber, Tannenstr. 9, 
Ch-8212 Neuhausen 

C-16 mit Zubehör, Tausche 
gg. Hard- u. Software f£. 
Schneider 6128, z.B. CTM 
644, FD-1, Drucker, Data- 
phon, Sprechsynth. etc. 
Suche Anwender-Softw. f. 
meinen CPC u. Spiele. Kon- 
takt: A.Z. Duda, Barbarossa- 
ring 32, 6750 Kaiserslautern, 
T. 0631/40656, Sa./So. 
Tausche: 

GAG (orig.) auf Disk!! Gg. 
10. Leere 3-Zoll-Disk. od. 
bar!! Tel. 02624/6216 


Okimate 20 bietet seine Dien- 
ste an: Drei Farb-Hardcopies 
auf Folie f. 10 DM. Thorsten 
Elge, Steinkirchener Str. 14, 
1 Berlin 26, T. 030/4159090 
Verkaufe f. CPC Turbo Pascal 
u. Tasword-Textverarb. 

Tel. 07522/5531 


Wegen Umstellung zu verk.: 
Für CPC 464: Texpack, 
Turbo-Adress, Top-Datei, 
Vereinsverw. je 55 DM. 

Für Joyce: Tasword, Faktura, 
Fibu-King, Window-Kasse, 
Business-Pack, je 65 DM. 
Bessler, Tel. 06195/61117 
nach 19h 

Verk. gebr. orig. Software: 
Oh Mummy, Harrier Attack, 
Kung Fu, Punchy, zus. 25 
DM; Databox 9 DM; Data- 
base 20 DM; Zorro 20 DM; 
Boulder Dash 20 DM; 
3-D-Boxing 20 DM; Terra- 
master 50 DM; Screenpla 

50 DM. T. 030/4159090, 
Th. Elge 


Suche Textverarb. Software 
„Wordstar“ f. CPC 6128. 

Tel. 06372/2710, Hrn. Hanss 
verl., abends ab 20 Uhr 

Tel. 06386/4845 

Suche Farbmon. zum CPC 
464. Biete Grünmon. GT64 
u. Ausgleich. Tel. 089/ 
4317285, So.-Do. ab 18h 
(nach Thomas fragen) 

*** TAUSCHE *** 
CPC-Spiele u. Anwendungen. 
Schickt Eure Listen an: 
Lars-Peter Kuhr, Kaiser-Hein- 
richstr. 7, 8354 Metten 1, 
100 % Antwort!!! 

Achtung, ehemalige ZX81- 
User! Suche dringend RAM- 
Erw. (16K aufwärts) f. ZX81. 
Angebote bitte an: A. Rohr- 
bacher, Winzerstr. 19, 

7859 Efringen-Kirchen 


_TEST _ 


IST FÜR DEN 


MIRAGE IMAGER 
EIN FREMDWORT 


Immer noch im Rahmen unserer Diskussion um den 
Kopierschutz, der gerade die Spiele am härtesten 
trifft, wollen wir heute eine akzeptable Lösung vor- 
stellen, mit der sowohl Softwareverlage als auch 
Käufer zufrieden sein können. Eigentlich ist ja 
nur das Recht des Kunden zu wahren, der seine 
Software gerne mit einer Sicherheitskopie oder über 
ein schnelleres Laufwerk benutzten will. Demgegen- 
über steht aber der berechtigte Anspruch des Pro- 
grammierers, der seine Urheberrechte nicht aus- 
reichend entlohnt sieht, wenn zuviele Raubkopien 


kursieren. 


Jenes Spiel, das kopiert 
und trotzdem nur vom 
rechtmäßigen Besitzer be- 
nutzt werden kann, ist 
allerdings noch nicht er- 
funden und es schaut so 
aus, als müsse man noch 
eine Weile darauf warten. 
Mittlerweile haben sich 
Hardwarehersteller in die 
Diskussion eingeschaltet. 
Es geht um Geräte, die 
den gesamten Speicherbe- 
reich kopieren können, 
unabhängig von der Art 
der Software und der 
gerade ablaufenden Rou- 
tine. Der Mirage Imager 
— übersetzt: Ebenbild 
einer Spiegelung — ist ein 
solche Mischung aus 
Soft- und Hardware. 


Anschlußprobleme oder 
Unklarheiten beim Hand- 
buch? 


Geliefert wird der Mirage 
Imager als Aufsteck- 
modul in der gleichen 
Farbe wie der CPC. Die 
Verpackung kommt 
direkt aus England der 
Heimat aller CPC’s, und 


so verspricht denn auch 
die Aufschrift: „FOR 
THE AMSTRAD CPC 
464 664 6128“. Vom 
deutschen Vertreiber, der 
Firma Weeske ist ein ... 
beigefügt. Nein, kein 
Handbuch, sondern ein 
Handzettel, welcher auf 4 
Seiten im Format A5 
Unklarheiten aufwirft. 
Da ist unter anderem 
die Rede vom CPC 6128, 
dessen zweite Speicher- 
bank genutzt werden 
kann und sogar, daß seine 
Enter-Taste Return ge- 
nannt wird, findet sich in 
einem Nebensatz. Dies 
mag ja alles richtig sein, 
aber das Originalgerät, 
welches wir aus der Origi- 
nalverpackung entnah- 
men, ließ sich nur am 
464 nutzen. Schuld daran 
ist alleine schon der 
Unterschied der Steckver- 
bindungen zwischen bei- 
den Rechnern. Hat das 
bei Weeske niemand ge- 
wußt oder gibt es irgend- 
wo einen Adapter und 
man hat einen Universal- 
zettel gedruckt? Aber 
warum ist dann nirgend- 
wo ein Hinweis auf dieses 


Problem? Wie dem auch 
sei, unser „Mirage Ima- 
er“ beharrte auf einen 
CPC 464 als Partner. 


Kopierer „lauert“ im 
Hintergrund 


Das flache Gehäuse bietet 
an der Vorder- und Rück- 
seite je eine Steckerleiste 
als Verbindung. Die Vor- 
derseite wird statt des 
Diskettencontrollers am 
Keyboard eingesteckt, 
der Controller wandert 
statt dessen an die Rück- 
seite des „Imagers“. Im 
Prinzip ist dies der 
ganze Anschluß, der zu 
bewerkstelligen ist. Aller- 
dings muß man sich des 
richtigen Sitzes der 
Steckverbindungen verge- 


- wissern, ansonsten bleibt 


die Diskette unbeachtet, 
schlimmer noch, es wird 
hierzu keine Fehlermel- 
dung ausgegeben. Aber 
die herausgeführten Pla- 
tinenkontakte waren ja 
schon immer eine Sorge 
der 464-Benutzer und 
wurden nicht erst mit 
dieser Kopierhilfe einge- 
führt. Stimmt die Verbin- 
dung, kann es losgehen. 
Das Programm wird 
wie gewohnt eingeladen. 
Das heißt, daß auch vom 
„Mirage Imager“ nichts 
zu bemerken ist. Nicht 
mal eine Bildschirmmel- 
dung über das Vorhan- 
densein des Gerätes. Erst 
wenn das Programm im 
Speicher ist, drückt man 
auf den roten Knopf und 
der „Bitfänger“ gibt sich 
zu erkennen. Die Betäti- 
gung der Enter-Taste (ver- 
gessen wir mal das Re- 
turn des 6128) bringt ein 
zweizeiliges Menue an 
den oberen Rand des 
Bildschirms und bittet 
um Auswahl. Die ersten 
drei Befehle dürften wohl 
die wichtigsten sein, sind 
sie doch der eigentliche 
Grund für den Kauf des 
Gerätes. LOAD, SAVE 
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und RUN sorgen für die 
Abspeicherung, das 
Laden und das Starten 
der Programme. Im be- 
schriebenen Stadium der 
— also mit einem einge- 
lesenen Spiel — ist aller- 
dings nur die Funktion 
SAVE wichtig. Nach der 
Auswahl durch den An- 
fangsbuchstaben und der 
Bestätigung durch Enter 
wird nach dem Pro- 
grammnamen gefragt. 
Hierbei können nicht 
mehr als acht Zeichen 
verwendet werden, die 
Extension „IMG“ wird 
automatisch hinzugefügt. 
Ist eine Diskettenstation 
angeschlossen, kann man 
das Laufwerk auswählen 
(A oder B) und selbstver- 
ständlich auch auf Kas- 
sette abspeichern. Wählt 
man den Rekorder zum 
Abspeichern, dann hat 
man die Wahl zwischen 
den beiden Baudraten 
des CPC (langsam und 
schnell) sowie einem 
Speedloader, der den ra- 
santen Titel Turbo trägt. 
Letzteres ist eigentlich 
empfehlenswert. Immer- 
hin handelt es sich bei 


jedem Programm um ein 
53 KByte großes File und 
dazu braucht es Geduld. 
Während dieses Dialo- 
ges hat sich das Bild des 
Spielprogrammes verzerrt 
und zeigt falsche Farben. 
Dies hat jedoch keinerlei 
Bedeutung, sondern liegt 
nur an dem kurzfristigen 
Eingreifen des „Imagers“. 
Auch steht es in keinerlei 
Zusammenhang mit dem 
Menuepunkt INK, zu dem 
wir später noch kommen. 
Auf Datenträger ge- 
brachte Speicherauszüge 
können später mit dem 
LOAD-Befehl des Gerätes 
eingelesen werden und 
müssen dann mit RUN 
gestartet werden. Die 
„Riesendateien‘“ auf der 
Diskette nutzen alleine 
nichts, sie zu starten, 
dazu bedarf es des Mirage 
Imagers. Dies ist sicher- 
lich auch der Grund, 
warum Raubkopierer 
nicht gerne zu derartiger 
Hilfe greifen und warum 
diese dann auch von Soft- 
warefirmen stillschwei- 
gend geduldet werden. 
Auch wenn derjenige, der 
eine fremde IMG-Kopie 
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Der Mirage Imager — Ein 
unscheinbarer „Kasten” 


erhält, über einen Imager 
verfügt, ist die Lauffähig- 
keit der Software noc 
längst nicht gewährlei- 
stet. Unterschiede in den 
ROM-Versionen der 
CPC’s und wohl auch in- 
nerhalb der Imager Pro- 
duktion sorgen für ausrei- 
chende Inkompatibilität. 
Es kann — dies soll 
nicht verschwiegen wer- 
den — durchaus vorkom- 
men, daß eine derartige, 
Raubkopie doch einmal 
funktioniert. Das große 
Geschäft dürfte allerdings 
aufgrund der Ungewiß- 
heit nicht zu machen 
sein. Für die Hacker, 
jene Programmschutz- 
Entschlüßler mit Sports- 
geist, ist der Reiz ohnehin 
genommen. 


Der Menuepunkt INK er- 
laubt, die Farben eines 
Spieles zu ändern. Für 
die Besitzer eines Grün- 
monitors kommt damit 
endlich wieder Spielfreu- 
de in Programme, bei 
denen der Programmierer- 


die eingeschränkten 
Fähigkeiten dieser Moni- 
tore nicht beachtete. 


Auch die Festlegung die- 
ser Parameter geschieht 
im Dialog-Verfahren. 
Nach Auswall einer PEN- 
Nummer kann man dieser 
eine neue INK-Zahl zu- 
weisen. 


Veränderungen am 
Programm 


Weniger zuverläßig ist 
die Änderung der Adresse 
für den Bildschirmspei- 
cher und die Größenän- 
derung des Bildes. Schuld 
daran ist allerdings die 
teilweise recht verzwickte 
Programmiertechnik 
kommerzieller Software. 
Bei harmlosen Program- 
men arbeitet der Mirage 
Imager einwandfrei. Im- 
merhin steht damit für 
all jene, die ein wenig 
experimentieren wollen 
ein kleiner Spaß ins Haus. 


Ausreichende Anzahl von 
Fehlermeldungen 


Wichtig bei einem Ko- 
pierprogramm sind abzu- 
fangende Fehlermeldun- 
gen. Wenn der ganze Vor- 
gang unterbrochen ist, nur 
weil im entscheidenden 
Augenblick des Abspei- 
cherns festgestellt wurde, 
daß die Diskette voll ist, 
dann werden neue und 
lange Ladezeiten zum 
Ärgernis. Der Mirage 
Imager hat dem gegen- 
über vorgesorgt. Eine 
recht umfangreiche Liste 
für die meisten Eventuali- 
täten unterbricht zwar 
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ARE, 


die laufende Funktion, 
das Originalprogramm 
bleibt jedoch erhalten 
und die Option kann neu 
gestartet werden. 


Fazit: Mit Einschränkun- 
gen brauchbar und recht- 
lich einwandfrei 


Dem Wunsch nach Si- 
cherheitskopien für eige- 
ne Programme am eige- 
nen Gerät kommt der 
Imager gerne nach. Ein- 
schränkungen sind jedoch 
zu machen. Es gibt auf 
jeden Fall Schwierigkei- 
ten, wenn Programme ko- 
piert werden, die einige 
Teile nachladen (etwa das 
Spiel Gaunthlet). Hier 
muß der Kopierer passen, 

Einen zweiten Nachteil 
fanden wir auf der Suche 
nach der Lauffähigkeit 
der kopierten Software 
heraus. Wir gerieten an 
unsere sogenannte „Vor- 
tex-Station“, ein CPC 
464 mit Speichererweite- 
rung und Doppellaufwerk 
besagter Firma. Und hier 
lief nichts mehr. Der 
Imager ignorierte trotz 
aller Tricks das ange- 
schlossene Laufwerk (wir 
haben den Sitz der Kon- 
takte natürlich überprüft) 
und weigerte sich unter 
bestimmten Umständen 
sogar, das Programm von 
der Kassette zu lesen. 
Die schlechte Nachricht 
für Vortex-User liest sich 
im Beipackzettel so: ‚... 
überprüft der Mirage 
Imager alle vorhandenen 
ROMs“. Es scheint, als sei 
Vortex bei dieser Prüfung 
durchgefallen. 

Ansonsten sorgt das 
Gerät für einwandfreie 
Sicherheitskopien, mit 
denen der Anwender kein 
schlechtes Gewissen 
haben muß. Und das ist 
ja auch schon etwas. 


SERIE 


RICHTIG 


PROGRANIMIEREN: 


PLANUNG 
UND AUFBAU 
EINER DATEI 


Viele alte Hasen der „Programmierkunst” gingen 
einen ganz einfachen Weg: Sie tippten Listings ab, 
machten natürlich auch Fehler und haben dann — 
meist aus Mangel an Literatur — lange Zeit an der 
Korrektur verbracht, dabei aber auch aus ihren 
Fehlern gelernt. Tatsächlich steckt im Abtippen 
ein wesentlich größerer Lerneffekt als oftmals ver- 
mutet. Aber man muß ja nicht unbedingt Fehler 
machen, um schlauer zu werden. Noch besser ver- 
meidet man den frustrierenden Syntax Error durch 


Wissen. 


Für die Leser unserer 
Zeitschrift, die bisher 
noch nicht selbst pro- 
grammiert haben, begin- 
nen wir in diesem Heft 
damit, an einem Beispiel- 
programm zu zeigen, wie 
man von den ersten Über- 
legungen zu einem ferti- 
gen Listing kommt. 

Da diese Beiträge für 
die Neueinsteiger gedacht 
sind (Fortgeschrittene 
finden in Schneider aktiv 
ja auch einen Assembler- 
kurs), werden wir uns auf 
Basic beschränken und 
versuchen, Sie Schritt für 
Schritt an die Tricks und 
Kniffs, die dabei zu be- 
achten sind, heranzufüh- 
ren. " 


Was ist strukturiertes Pro- 
grammieren? 
Grundsätzliche Überle- 
gungen 


Wir wollen also ein Datei- 
programm für ihre Soft- 
ware-Sammlung schrei- 
ben. Dazu jetzt einige 
Vorgedanken darüber, 


-Diskette/Kassette, 


was das Programm leisten 
soll. 

Zuerst muß natürlich 
die Eingabe der Pro- 
grammtitel möglich sein. 
Aber damit allein kann 
man ja noch nicht viel 
anfangen. Außerdem 
braucht man dann noch 
die Möglichkeit, die 
auf 
der sich das jeweilige 
Programm befindet, ein- 
zugeben, den Namen des 
jeweiligen Start-Files, die 
Länge des gesamten Pro- 
gramms sowie eventuelle 
Bemerkungen. 

Aber nicht nur die Ein- 
gabe soll möglich sein, 
sondern auch das Lö- 
schen. Denn wozu soll 
man sich in der Datei 
Programmangaben auf- 
heben und sozusagen als 
Müll mitschleppen, wenn 
man das Programm selbst 
nicht mehr benötigt und 
schon gelöscht hat? 

Ferner kann es sein, 


daß einzelne Angaben zu: 


Programmen geändert 
werden müssen, zum Bei- 
spiel dann, wenn es auf 
einen anderen Datenträ- 
ger übertragen wird. 


Weiterhin benötigen 
wir noch eine Routine, 
um in der Datei beliebig 
zu suchen und die Anga- 
ben, die benötigt werden, 
auf dem Bildschirm oder 
dem Drucker auszugeben. 
Und zum Schluß wollen 
wir noch die Ausgabe der 
gesamten Liste auf dem 
Drucker ermöglichen. 
Schön ist es natürlich, 
wenn die Daten dann 
auch sortiert ausgegeben 
werden. 


Neuauflage für den CPC. 
Schneider aktiv liefert den 
Basic-Kurs für „Newcomer” 


Wir benötigen dabei 
also folgende Unterpro- 
gramme: 
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— Programme in Dateı 
aufnehmen 

— Programme aus Datei 
löschen 

— Daten ändern 

— Programme suchen 

— Programmliste 
drucken 
Und damit das Datei- 

programm ordnungsge- 


aus- 


mäß verlassen werden 

kann: 

— Ende der Bearbeitung 
Alle diese Vorüberle- 

abge- 


gungen müssen 


schlossen sein, bevor man 
sich an seinen CPC setzt 
und mit dem eigentlichen 
Programmieren beginnt. 
Denn wenn das Pro- 
gramm fertig ist, bereitet 
es manchmal doch erheb- 


liche Schwierigkeiten, 
nachträglich noch etwas 
einzubauen. Da verliert 
man dann leicht den 
Überblick. 


Die ersten Schritte: 
Um welche Daten geht es 


Weiter oben wurde be- 
schreiben, welche Daten 
wir benötigen. Als näch- 
sten Schritt werden wir 


dazu jetzt die Variablen- 
namen festlegen. Grund- 
sätzlich sollte man von 
dem Variablennamen auf 
den Inhalt dieser Varia- 
blen schließen können. 
Also legen wir fest: 
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Variable/Variablennamen 
Programmtitel/pn$ 
Startfilename/filng 

Disk (Kass)-Name/ort$ 
Programmlänge/lae$ 
Bemerkungen/bem$ 

Wozu braucht man 
nun hinter dem Varia- 
blennamen das Dollar- 
Zeichen? Ganz einfach, 
damit teilen wir dem 
Computer mit, daß essich 
hier nicht um Zahlen, 
sondern um Buchstaben 
handelt, die er sich unter 
dem jeweiligen Variablen- 
namen merken soll. Diese 
Art Variablen nennt man 
auch String-Variable. 

In unserem Programm 
tauchen sie zwar nicht 
auf, sollen aber nicht un- 
erwähnt bleiben; die 
Variablennamen für Zah- 
len. Man unterscheidet ja 
zwischen Real-(Komma- 
zahlen) und Integerzah- 
len (Ganzzahlen). Wäh- 
rend erstere nur durch 
einen Namen ohne jeden 
Zusatz repräsentiert wer- 
den, muß an Integerzah- 
len ein Prozentzeichen 
(name%) angehängt wer- 
den. 


Das Menue 


So weit die Einleitung, 
jetzt gehts aber wirklich 
los mit dem Programmie- 
ren. Wie Sie aus dem 
Listing zu diesem Artikel 
sehen, ist es diesmal nur 
kurz. Aber es soll ja auch 
nur der Beginn unseres 
Gesamtprogramms sein. 
Die Zeilen 10 bis 50 
dienen nur dazu, den- 
jenigen, der sich das 
Listing ansieht, schon im 
Kopf zu sagen, um wel- 
ches Programm es sich 
handelt. Diese Zeilen 
haben keinen Einfluß auf 
den Programmablauf. 
Warum nicht? Weil hinter 
jeder Zeilennummer das 
Zeichen steht. Dieses 
Zeichen sagt dem CPC, 
daß er dem nachfolgen- 


den Zeileninhalt keinerlei 
Beachtung mehr zu 
schenken braucht. Statt 
des °’-Zeichens könnten 
wir auch REM schreiben. 

Noch ein Satz zu den 
Zeilennummern. Der 
Computer arbeitet Zeile 
für Zeile ab, für ihn ist 
es gleich, ob die Zeilen 
im Zehnerabstand be- 
nummert sind oder in 
einem anderen Abstand. 
Manche Programmierer 
arbeiten auch mit Einer- 
oder Fünferschritten. 
Aber der Zehnerabstand 
hat sich bewährt, und 
zwar deshalb, weil man 
dann bei späteren Erwei- 
terungen des Programmes 
immer noch die Möglich- 
keit hat, einige Zeilen 
dazwischen zu setzen. 

In Zeile 60 steht jetzt 
der erste Befehl: MODE 
2. Damit schalten wir den 
Bildschirm auf 80 Zei- 
chen pro Zeile um und 
löschen gleichzeitig den 
Bildschirm. 

In Zeile 70 steht jetzt 
für den Einsteiger ein 
etwas eigenartiger Befehl. 
Diese Zeile hat folgenden 
Sinn: Reservierung von 4 
KByte Speicherplatz für 
die Datenein- und -aus- 
gabe mit Ihren Massen- 
speicher (Diskette/Kas- 
sette). Zwar geht Ihnen 
dieser Speicherplatz tat- 
sächlich verloren, ohne 
den sogenannten 
„Dummy-Befehl“ kann 
es jedoch dazu kommen, 
daß Sie Ihre Daten plötz- 
lich nicht mehr abspei- 
chern können. 


Windows für die Ordnung 
auf dem Monitor 


Als nächster Schritt 
wird ein bestimmter Bild- 
schirmbereich als Fenster 
definiert. Dieses Fenster 
(window) hat in unserem 
Fall folgende Dimensio- 
nen: 


linke Spalte = 1 
rechte Spalte = 80 
obere Spalte = 1 
untere Spalte = 1 
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Sie können sich die 
Window-Definition ganz 
einfach merken: window- 
Nr., links, rechts, oben, 
unten. Wozu braucht 
man nun die Fenster? Sie 
sind ganz praktisch zur 
Aufteilung des Bild- 
schirmes in verschiedene 
Bereiche, die auch ge- 
trennt angesprochen wer- 
den können. So ist es 
zum Beispiel möglich, 
nur einen Teilbereichs 
des Bildschirmes zu lö- 
schen, in dem Sie mit 
dem cls-Befehl nur das zu 
löschende Window 
ansprechen; also zum Bei- 
spiel: CLS # 1 (löscht 
also nur den mit Window 
1 definierten Teil des 
Bildschirms). 

In der nächsten Zeile 
wird wieder Speicher- 
platz reserviert. Wir teilen 
dem CPC mit, wie oft die 
einzelnen Variablen 
maximal mit Werten be- 
legt werden sollen. Wir 
haben hier - vorgesehen, 
daß insgesamt 200 ver- 
schiedene Programmna- 
men usw. verwaltet wer- 
den können. Falls Ihnen 
dieser Platz nicht aus- 
reicht, müßten Sie hier 
größer dimensionieren, 


Der Speicherplatz hat 
seine Grenzen 


aber Achtung: Der Ar- 
beitsspeicher Ihres CPC’s 
ist begrenzt. Für den Fall, 
das Sie mit einem größe- 
ren DIM-Befehl an die 
Speicherkapazität Ihres 
Computers stoßen und 
doch noch nicht Ihre ge- 
samte Software haben 
eingeben können, zeigen 
wir Ihnen später auch 
eine Möglichkeit auf. 

Die nächsten Zeilen 
sind nur für Farbmonitor- 
besitzer wichtig. Mit dem 
BORDER-Befehl wird die 
Randfarbe und mit dem 
INK-Befehl die Hinter- 
grundfarbe festgelegt. Wir 
haben uns auf die Farbe 
3 festgelegt, die aber von 
Ihnen je nach Geschmack 
geändert werden kann. 


In Zeile 120 wird jetzt 
im Window 1 (siehe 
oben) eine Statuszeile 
eingeblendet, die auch in 
den Unterprogrammen 
immer wieder benutzt 
wird. Damit sie sich bes- 
ser von der übrigen Bild- 
schirmdarstellung abhebt, 
erscheint sie durch .den 
zusätzlichen CHR$( 


zusätzlichen CHR{$(24)- 
Befehl invers, das heißt, 
die Farbe des Schreib- 
stiftes und die Farbe des 
Hintergrundes werden 
vertauscht. Das Semiko- 
lon am Zeilenende ver- 
hindert einen Zeilenvor- 
schub. 

In den Zeilen 130 bis 
180 wird das Menue 
geschrieben, und zwar 
nicht oben links auf dem 
Bildschirm. beginnend, 
sondern an den mit den 
LOCATE-Befehlen defi- 
nierten Stellen. Dieser 
Befehl erwartet zwei An- 
gaben, wobei die erste 
Zahl die Spalten und die 
zweite Zahl die Zeilen- 
nummer bedeutet. Und 
genau an dieser Stelle 
beginnt Ihr CPC mit 
dem Schreiben des Tex- 
tes, der dem PRINT-Be- 
fehl folgt. 


Bildschirmaufteilung des 
CPC 


Jetzt war schon mehr- 
mals von Zeilen und Spal- 
ten die Rede. 
läuterung: Mit Spalten 
meinen wir (und der 
CPC) die senkrechten 
Spalten, die in den drei 
verschiedenen Modi’s fol- 


gende maximale Werte 
annehmen können: 
MODE 0 = 20 Spalten, 
MODE 1 = 40 Spalten, 
MODE 2 = 80 Spalten. 
Die Zählweise beginnt 


dabei immer links. 

Bei den Zeilen, die in 
jedem Modus immer bis 
zu maximal 25 zu zählen 
sind, wird oben begon- 
nen. Die Zeile 1 befindet 
sich also am oberen Bild- 


Zur Er- 


. 
[23 
’% 


MODE 2 
70 
LOSEOUT 


SERIE 


RRRHHRRSISIHHRESISHRIRISSIESEIHISISESESEHENE 
PROGRAMMVERWALTUNG * 
FUER * 


CPC 464/664/6128 
BRRRBRRRSHRRRHRIHHHHHIHIHIHIHIHISURSESHT SEN 


Je* 


DPENOUT "dummy":MEMORY HIMEM-1:C 


80 WINDOW #1,1,80,1,1 


90 DIM pn$( 200), Filngt 200), ort$( 200 
),lae$( 200), bem$( 200) 


100 BORDER 3 
110 INK 0,3 
120 PRINT #1, 


UPTMENUE 
PRINT #1,CHR$( 24); 
130 


LOCATE 24,10:PRINT"< 1 > 


CHA$( 24); ” 
PROGRAMN-VERWALTUNG / HA 


Progra 


mme in Datei aufnehmen" 

140 LOCATE 24,11:PRINT"”< 2 > Progra 
mme aus Datei loeschen"” 

150 LOCATE 24, 12:PRINT”< 3 > Daten 
aendern"” 

160 LOCATE 24,13:PAINT"< 4 > Progra 


mme suchen” 


170 LDCATE 24,14:PRINT”< 5 > 


Progra 


mm-Liste ausdrucken” 


180 LOCATE 24,15:PRINT"< 


er Bearbeitung” 


190 LOCATE 32, 17:PRINT 


6 > Ende d 


"Ihre Wahl” 


200 a$=INKEY$: IF a$="" THEN GOTO 20 


0 


210 a=VAL(a$) :IF a<i OR a>6 THEN 20 


220 ON a GOTO 1000,2000,3000,4000,5 


0 
000, 6000 
1000 "hier beginnt 


rprogramm 1 
2000 hier beginnt 
rprogramm 2 
3000. "hier beginnt 
rprogramm 3 
4000 hier beginnt 
rprogramm 4 
5000 
rprogramm 5 
6000 "hier beginnt 
rprogramm 6 


"hier beginnt 


spaeter das Unte 


spaeter das Unte 
spaeter das Unte 


spaeter das Unte 


spaeter das Unte 


spaeter das Unte 


7000 CLS:G0OTO 120 ° Zeile faellt sp 


aeter weg 


schirmrand, die Zeile 25 
dagegen unten. Diese 
Hinweise beziehen sich 
aber ausschließlich auf 
den sogenannten Schreib- 
Modus, im Grafik-Modus 
wird ganz anders gezählt. 


Da wir uns aber mit unse- 
rem Programm aus- 
schließlich im Schreib- 
modus befinden, soll der 
Grafik-Bildschirm-Modus 
hier außer Betracht blei- 
ben. 
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Die Zeile 190 fordert 
Sie nun auf, Ihre Wahl 
zwischen den einzelnen 
Menuepunkten zu tref- 
fen. In Zeile 200 erfolgt 
dann die Tastaturabfrage. 
Die Taste, die Sie dann 
drücken, wird in der 
Hilfsvariablen a$ abgelegt. 
Drücken Sie nun keine 
Taste, so ist die Variable 
ag leer und es erfolgt 
durch den Befehl GOTO 
200 der Rücksprung zum 
Zeilenanfang. Diese 
Schleife wird nun so oft 
durchlaufen, bis eine 
Taste gedrückt wird. 

In der nächsten Zeile 
wird nun nach dem 
Drücken einer Taste der 
Wert von a$ über den 
VAL-Befehl in die Zah- 
lenvariable a umgewan- 
delt und mit der Bedin- 
gung a<l oder a>6 so 
abgefragt, daß nur diese 6 
Zahlen als richtige Ein- 
gabe gewertet werden. 
Bei allen anderen Tasta- 
tureingaben erfolgt der 
Rücksprung zur Zeile 200 
und die Tastaturabfrage 
beginnt von neuem. 


Fertig für den ersten 
Probelauf 


In der Zeile 220 er- 
folgt nun durch den Be- 
fehl ON a GOTO durch 
Absprung zu der Zeile, an 
der das jeweilige Unter- 
programm später einmal 
stehen wird. 

Die Zeilen 1000 - 7000 
werden später entfallen. 
Wir haben sie hier nur 
eingegeben, damit das 
Programm, falls Sie es 
abgetippt und ausprobie- 


ren wollen, nicht mit 
einer READY-Meldung 
abbricht. 


So, dies war nun der 
erste Teil. Für Freak’s 
sicherlich langweilig. 
Aber dieser Beitrag ist ja 
für die Neueinsteiger ge- 
dacht. 


JE) 


THE SOUND OF MUSIC 


Synthesizer-Musik, mittlerweile ein weitverbreitetes 
Hobby, ist in geringem Umfang auch mit dem 
CPC möglich. Zwar kann er es nicht mit den Qualitä- 
ten der Atari- oder Amiga-Computer aufnehmen, 
doch dürfe manch einer staunen, was aus dem 
„Piepser‘' des Homecomputers alles herauszuholen ist. 
Schneider aktiv-Autor Sascha Basler war der richtige 
Mann, um einmal all diese Fähigkeiten zu schildern. 
Als Hobby-Musiker mit Tonstudio-Erfahrung kennt er 
die Ansprüche moderner elektronischer Musik und 
weiß den CPC daran zu messen. In’loser Folge 
berichtet er hier über das, was mit dem Schneider 
Computer noch machbar ist. 


Computer werden in vie- 
len Anwendungsgebieten 
benötigt. Zum Beispiel 
zum Entwerfen von Gra- 
fiken, Texten usw. 

Das Anwendungsgebiet 
Musik wird jedoch mei- 
stens vergessen. Beim 
Schneider hat man in die- 
sem Bereich interne und 
auch externe Anwendungs- 
möglichkeiten. Interne 
Möglichkeiten sind inso- 
fern vorhanden, daß man 
Musik z.B. durch Basic 
programmieren kann, die 
dann allerdings nur durch 
den Computer ausgegeben 
wird. Externe Möglichkei- 
ten sind durch die soge- 
nannte MIDI-Technologie 
gegeben. MIDI steht für 
„Music Instrument Digi- 
tal Interface“ und ermög- 
licht die Ansteuerung von 
Synthesizern und anderen 
digitalen, MIDI-fähigen 
Instrumenten mit dem 
Computer. 


Diese Reihe wird sich so- 
wohl mit den internen 

als auch mit den externen 
Möglichkeiten beschäfti- 
gen und soll Ihnen neue 
Kenntnisse über das Musi- 
zieren mit dem Computer 
vermitteln. In dieser Aus- 
gabe werden wir uns mit 
der Hardware der CPC- 
Computer beschäftigen 
und allgemeine Informa- 
tionen vermitteln. 


DIE HARDWARE 


Der Schneider besitzt den 
Soundchip AY 3-8912 
von General Instruments, 
mit dem er maximal drei 
Töne auf verschiedenen 
Kanälen ausgeben kann. 
Dieser Vorgang läuft syn- 
chron ab. Die drei Kanäle 
sind so geschaltet, daß 
die programmierte Musik 
in Stereo ausgegeben wer- 
den kann. 

Kanal A ist auf den linken, 
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Kanal B auf beide und 
Kanal C auf den rechten 
Lautsprecher gelegt wor- 
den. Weiterhin besitzt 

der Soundchip noch einen 
Rauschgenerator, der al- 
len drei Kanälen einzeln 
zugemischt werden kann. 
Dazu müssen natürlich die 
erforderlichen Informatio- 
nen, wie Tonhöhe, Laut- 
stärke und der gewünschte 
Kanal vorher an den 
Soundchip weitergegeben 
worden sein. 


DAS KONZEPT DER 
SOUNDSTEUERUNG 


Die Klangwiedergabe des 
Schneiders ist sowohl 
softwaregesteuert als 
auch softwareorientiert. 
Die Befehle werden da- 
zu benutzt, Informatio- 
nen an die Hardware- 
Bausteine weiterzugeben, 
die dann das ausführen, 
was die Software befiehlt. 
Der Kern des Sound-Be- 
fehls sind drei Warte- 
schlangen. Sie dienen als 
Pufferspeicher für die 
drei Kanäle. Jede der 
Warteschlangen kann 
höchstens vier Komman- 
dos abspeichern. Das er- 
ste, das gerade bearbeitet 
wird und drei weitere, 
die auf die Bearbeitung 
warten. Die Sound-An- 
weisungen werden grund- 
sätzlich nacheinander 
behandelt. Der CPC 
überprüft hundertmal in 
der Sekunde, ob ein 
Sound-Befehl abgeschlos- 
sen ist oder eine Abände- 
rung vorgenommen wer- 
den muß. Ist ein Sound- 
Befehl abgearbeitet, 

wird er aus der Warte- 
schlange entlassen und 

es kann ein neuer Be- 
fehl aufgenommen wer- 
den. Nun wird der zweite 
Soundbefehl bearbeitet 
usw. Da aber in jeder 
Warteschlange Töne mit 
unterschiedlicher Länge 
sein können, ist es natür- 
lich auch möglich, daß 
Kanal C schon das dritte 
Kommando behandelt, 
während Kanal A noch 
den ersten Sound-Befehl 
bearbeitet. 
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Wir haben oben gelernt, 
daß Sound-Befehle in der 
Regel nacheinander ausge- 
führt werden. Dieses ist 
jedoch keine Bedingung. 
Da der CPC auch noch 
über zwei andere Modi 
verfügt, ist es möglich, 
den CPC in den sogenann- 
ten „‚Hold“-Mode zu set- 
zen. Der Klang wird dann 
nur gespeichert, aber 
nicht ausgeführt. Dieses ist 
sehr bedeutend für Spiele- 
programmierer, da man 
den Klang zum Beispiel 
beim Spiel an der Stelle 
ertönen lassen kann, wenn 
der Spieler die vorher fest- 
gelegten Bedingungen er- 
füllt hat. Da der Klang 

ja bereits in der Warte- 
schlange abgespeichert ist, 
steht dieser sehr schnell 
zur Verfügung und kann 
durch das Kommando 
RELEASE abgerufen 
werden. 


FLUSH-MODE 


Der zweite Modus ist die 
Betriebsart FLUSH. Die- 
ser Modus dient dazu, die 
normale Reihenfolge der 
Warteschlange abzuän- 
dern, d.h., man kann 
Sound-Kommandos mit 
Priorität setzen. Dieses 
kann den normalen Musik- 
ablauf unterbrechen und 
wird sofort ausgeführt. 
Der neue Sound-Befehl 
wird also praktisch an die 
erste Stelle der Warte- 
schlange gestellt, was be- 
deutet, daß die restliche 
Warteschlange gelöscht 
wird. 


RENDEZVOUS 


Eine weitere sehr inter- 
essante Fähigkeit des 
Schneiders ist es, verschie- 
dene Klänge zu synchro- 
nisieren. Man kann also 
die Ausführung einer Ton- 
folge in einer Warteschlan- 
ge so lange aufhalten, bis 
bei der nächsten Warte- 
schlange die erwünschten 
Informationen zur Verfü- 
gung stehen. Diesen Mo- 
dus nennt man Rendez- 
vous. Der Modus ermög- 
licht einem praktisch das 
mehrstimmige Spielen von 
Musikstücken. 


Da das gesamte Soundkon- 
zept ja auf der Stereopho- 
nie basiert, ist es schlecht, 
die Befehle, die wir in die- 


CODE-BIT-BEDEUTUNG 


.10: Sound wird nach 


DAS SUPER ANGEBOT! 


Unser Kassetten-Service räumt sein Lager! 


ser und in den folgenden Kama Slunke) Wir bieten an: Bunte Programm-Mischung beste- 
Teilen behandeln wer- 21: Sound witdinach hend aus drei oder fünf Kassetten unterschiedlichen 
ei Sachen Ben in- “ Kanal B (Mitte) Inhalts mit Spielen, Utilities, Anwender-Program- 
probieren NE gesendet men. Nur solange Vorrat reicht. Zu Super-Preisen: 
Daher folgender Tip: 42: Sound wird nach Das Dreier-Paket für sage und schreibe DM 30, 
Schließen Sie den Com- - Kanal C (rechts) das Fünferpaket für ganze 40 DM! Keine Rück- 
puter entweder an eine gesendet . nahme, keine Wunschzusammenstellung! 
Stereoanlage an oder be- 8 3: Rendezvous mit Benutzen Sie unseren Bestell-Coupon auf S. 49 des 
nutzen Sie einen stereo- Kanal A . Heftes, einfach ankreuzen, Geld, Scheck beifügen 
phonen Kopfhörer. Das 16 4: KRONE mit oder Bankabbuchung. Ist die Ware vergriffen, 
Anschließen des Compu- ,,, Kanals mit wird der Scheck nicht eingelöst, beiliegendes 
en an Sr nahlöge era Bargeld zurückerstattet. 

Sie brauchen lediglich 64.6: Hold 

ein Kabel, das an dem ei- 128 7: Flush 

nen Ende’ einen Klinken- PARAMETER 2 


und am anderen Ende 
zwei Cinch-Stecker be- 
sitzt (erhältlich in jedem 
HiFi-Shop). Den Klin- 
kenstecker schließt man 
an die Buchse an, die 
sich neben dem Joystick 
Port befindet 


DER SOUND-BEFEHL 


Der Sound-Befehl verfügt 
über sieben Parameter. 
Das erste ist ein allgemei- 
ner Steuerwert, das zwei- 
te beinhaltet Angaben 
zur Tonhöhe. Darauf 
folgen Informationen 
zur Länge des Tones 

und zur Grundlautstär- 
ke. Mit den beiden fol- 
genden Parametern ist es 
möglich, die Lautstärke 
und die Tonhöhe zu ver- 
ändern, während der Be- 
fehl ausgeführt wird. Das 
letzte Parameter dient 
schließlich dazu, den 
Rauschgenerator dazuzu- 
mischen. In diesem Teil 
werden wir uns allerdings 
lediglich mit den ersten 
drei Parametern be- 
schäftigen. 


PARAMETER 1 


Das wichtigste Parameter 


des Soundbefehls ist zwei- 
fellos das Parameter 1. 

Es enthält Informatio- 
nen über den anzusteuern- 
den Kanal, über Rendez- 
vous, Hold und Flush, die 
in verschiedenen Bits ver- 
schlüsselt sind. Dazu fol- 
gende Tabelle: 


Das Parameter 2 gibt die 


Tonhöhe an. Den Grund- 
takt stellt die Frequenz 
125000 Hertz dar. Aus 
diesem Grundtakt lassen 
sich alle Töne errechnen. 
Da wir ja z.B. den Wert 
für das international ge- 
normte A wissen, nämlich 
440 Hertz, brauchen wir 
lediglich den Grundtakt 
durch diesen Wert teilen 
und erhalten den Wert, 
den wir als zweites Para- 
meter einsetzen müssen. 
In diesem Fall 284. 
Wollen wir nun das A ei- 
ne Oktave höher hören, 
müssen wir den Wert 

284 halbieren. Verdop- 
peln wir den Wert 284, 
erreichen wir dementspre- 
chend das eine Oktave 
tiefer liegende A. Weite- 
re Werte für die verschie- 
denen Notenwerte finden 
Sie aber auch im Hand- 
buch (Anhang IV). 


PARAMETER 3 


Mit dem Parameter 3 wird 


die Tonlänge angegeben. 
Die Einheit beträgt hun- 
dertstel Sekunden. Das 
bedeutet, daß Sie 25 ein- 
geben müssen, wenn Sie 
eine Viertel Note, 50 
wenn Sie eine halbe Note 
spielen wollen usw. 

So weit, so gut. Das näch- 
ste Mal werden wir das 
erste Parameter noch 
weiter vertiefen und 

dann unsere neu erworbe- 
nen Kenntnisse in einem 
ersten praktischen Bei- 
spiel anwenden. 


Mit Schneider aktiv 
sind Sie immer 
AKTIV! 


KLEINE TRICKS 
FÜR DIE CPCs 


1.) Durch Zeichensatzän- 
derungen ist oft der senk- 
rechte Strich, also das 
Kennzeichen für RSX- 
Befehle, nicht mehr ver- 
fügbar. Hat man vor der 
Zeichensatz-Änderung 
eine RSX geladen, kann 
diese nicht mehr aufge- 
rufen werden. Unter Um- 
ständen kann dann folgen- 
der Poke-Befehl helfen: 


POKE &B500,124 


Zwar erscheint dann u.U. 
der Buchstabe ö, aber 
dieser kann dann anstelle 
des senkrechten Striches 
benutzt werden. 
2.) Bei manchen Program- 
men erfolgt durch Call 0, 
die Beendigung. Dieser 
Aufruf bewirkt einen 
Warmstart des CPCs. 
Wird vorher in die Spei- 
cherstelle O der Wert 
&C9 gePOKEt, welcher 
der Maschinencode für 
RETURN ist, dann wird 
nn Rücksetzung verhin- 
ert. 


BASIC-HANDBUCH 
ERHÄLTLICH! 


Lange von vielen PC- 
Besitzern ersehnt, ist 
es nun endlich erhält- 
lich: Das Handbuch 

zu Basic2 kann zum 
Preis von ca. DM 40 — 
45 bezogen werden. 
Bezugsadresse ist ent- 
weder die Firma Schnei- 
der selbst oder der je- 
weilige Fachhändler. 
Der Umfang des _ 
Handbuches beträgt 
ca. 360 Seiten und ent- 
spricht im Format dem 
PC-Handbuch. Aller- 
dings sollte niemand 
überrascht sein, daß 
gleich 17 Seiten an 
Korrekturen mitgelie- 
fert werden. Dies ist 
zwar ein Schönheits- 
fehler, aber immer 
noch besser,als wenn 
man die Fehler nicht 
mitgeteilt hätte. Nach- 
dem dieses Handbuch 
nun erschien, wird es 
nicht lange dauern, 

bis auch bei uns eini- 
ge Basiclistings für 
Basic2 erscheinen. 


Verkaufe orig. Fibustar-Plus 
200,—, Privat 86 (Einkom- 
mensteuer) 40,—; Lagerhal- 
tung 25,—. Vorkasse, alle 
Prog. auf 3“. Ahmed Raafat, 
Offermannstr. 24, 5106 
Roetgen 

Verkaufe CPC 6128, Grün- 
mon., F1X-Vortex-Floppy, 
Recorder m. Kabel, Druk- 
ker-Kabel, orig. Nevada- 
COBOL, ROM Listing (M+T) 
10 Leerdisk. 3‘. VB 1.200 
DM. Tel. nach 18.30 Uhr: 
08131/93046 

Biete an: Spiele auf Disk.: 
Werner, 500GG-Grand Prix, 
Edenblues, je 35 DM, Ping- 
pong je 30 DM. Gg. V-Scheck 
an Klaus Kohn, Salmstr. 47, 
4018 Langenfeld/Rhld. 
02173/80588 

Suche erfahrenen Schneider- 
CPC-User, der mir beim Um- 
gang m. der Floppy DDI-1 
behilflich sein kann. Evtl. 
auch zum Software-Tausch. 
Raum Moers, Neukirchen- 
Vluyn. Stefan Tasch, 02845/ 
27996 

Achtung !!! 

Suche CPC-User zum Pro- 
gramm-Tausch. Bitte um Zu- 
sendung v. Listen. D. Kramer, 
Eichenstr. 17, 3549 Volk- 
marsen 


— m 


ware anfordern bei Friedrich 
Neuper, Postf. 72, 8473 
Pfreimd 

Schüler m. knappem Geld- 
beutel su. billige Software 

f. CPC 6128. Su. auch evtl. 
billigen Datenrec. (auch f. 
CPC 6128). Schickt Eure 
Listen an: Christian Fischer, 
Bgm .-Batzer-Str. 15, 8968 
Durach 

Suche Listing od. besp. Kass. 
m. Roulette-Prog. (CPC 464). 
Angebot an: Manfred Mier- 
sche, Tel. 030/4553387 ab 
20 Uhr 

CPC: Orig. Bomb-Jack-Kass. 
18,—; Joystick Competition 
Pro 5000 m. Mikroschaltern 
u. 2 Feuerknöpfen 25,—; 
CPC 464/664 Kass. „The 
Tales of the Arabian Nights“ 
18,—. Bei Nachnahme plus 
2,50 DM. Klaus Lindner, 
Weilerstr. 7, 5303 Bornheim 
4, Tel. 02227/7040 
Verkaufe FD1 3“ Zweit- 
floppy m. Abdeckhaube u. 
70 cm Flachbandkabel £. 
CPC 6128. Preis 300,— (6 
Mon. alt). Tel. 0431/789379 


Verkaufe: A View to a Kill 
20,-; Fligght Path 737 15,—; 
Harrier Attack 10,—; Mini 
Office 15,—; CPC Intern. 
9/86-1/87 u. 3/87 St. 4,—; 
alle 20,—; Thorsten Drum- 
hardt Oldentruper Str. 30, 
4800 Bielefeld 1, T. 0521/ 
296465 

Verkaufe CPC 6128, Color 
Monitor, Joystick, 6 Disk. 
(Spiele, Anwender), 35 CPC- 
Magazine, Abdeckhaube, wg. 
Systemwechsel zum Kom- 
plett-Preis von nur 1.399,—. 
Michael Schwarz, Ostertags- 
str.45, 7250 Leonberg. Tel. 
ab 19 Uhr: 07152/45684 
**%* Hey Ihr User (CPC 
6128) *** Wo steckt Ihr 
denn alle bloß? Suche ** 
Kontakte ** im Raum 8850 
Donauwörtz u. 8870 Günz- 
burg. Schreibt an Martin 
Dirr, Thamaschstr. 8, 8851 
Kaisheim 

For Sale: DK’ Tronics Light- 
pen m. ROM-Software 69 
DM. orig. Software auf Tape, 
z.B. Intern. Karate, Nexus... 
billig! Auch Tausch! (Suche 
Profi Painter Disk.) D. Nik- 
kel, Martin-Lutherstr. 7, 
7830 Emmendingen 
Orig.-Software: Hexenküche 
20 ,—; Colossus Chess 4.0 
29,—; Mathe-Pack (Schuster 
E.) 45,—; Turbo Esprit 25,—; 
DK’Tronics Lightpen (nicht 
gebr.) 50,— (m. Software). 
Bei: Reiner Klohn, Silcher- 
str. 2, 7916 Leibi, Tel. 
07308/3229 

** Biete an !! ** 
CAC-Graphik Adventure 
Creator, Anl. deutsch, neu u. 
unbenutzt 50,— DM.B. 
Müller, Tel. 06227/50541 
Video-1000 Digitizer f. CPC 
6128 gesucht. A. Ludwig, 
Conolilystr. 22,8 München 
40 


Matheprog.-Ergänzung zum 
Taschenrechner Schneider 
Int. 3/87 40,— incl. Disk., 
20,— ohne Disk, Verrech- 
nungsscheck od. Überweisung 
an: Sven Hildebrandt, Zum 
Katzenstein 33 in 3420 Herz- 
berg/Harz. Tel. 05521/2945 
Verkaufe: SP-320K m. BOS 
2.0 £. 200 DM; dk’Tronik 
Sprachausgabe f. 50 DM. 
Tausche: Spiele auf Disk., 
Tape (nur Orig.) z.B. Star- 
glider, Elevator Action, 
Alien 8, Batman, Karsten 
Reimers, Postf. 140208, 
2400 Lübeck 14 


— 


BÖRSE _ 


*** Schneider CPC 464 

*** Suche Software auf Tape 
(Spiele, Anenderprog.) An- 
gebote an: Uwe Hein, Sten- 
nernstr. 5, 3559 Burgw.- 
Bottendorf 

Suche dt. Anl. v. Silent Ser- 
vice, Tel. 07942/2769 

Suche dringend Farbmoni- 
tor in gutem Zustand für 
CPC 464. Sauerland /Iser- 
lohn, Tel. 02371/32905 

** Schneider CPC + Musik 

+ Midi ** Tausche Games gg. 
Musik- und Midi-Software 
Wer hat Erfahrung m. CPC, 
Midi, Synthi (DW8000)? 
Suche Sequenzer, Dumper, 
Library, Sounds, Music Sy- 
stem etc. Tel. 02206/6642 
Verk. Compute mit 6/85-5/86 
St. 1,50 DM; zus. 15 DM u. 
CPC Schneider Intern. 9/86- 
1/87 u. 3/87 St. 4,—, alle 
zus. 20,— DM (Topzustnd), 
Thorsten Drumhardt, Olden- 
truper Str. 30, 48 Bielefeld 
1, Tel. 0521/296465 


Tausche * Suche * Tausche 
Habe sehr viel Software !!! 
Habe Gabriele 9009 m. 
Schnittstelle (IFD) zu verkau- 
fen. VB od. Tausch gg. 5 1/4“ 
LW 720 KB für 6128 plus 
Mehrpreis. Wilhelm Beese, 
Baarstr. 27, 7218 Trossingen, 
T. 07425 7777 
Wer kann mir Informatio- 
nen bzw. PIN-Belegungsplan 
£. 5.25*-Laufwerk v. Texas 
Instruments Typ PHP 1250 
zwecks Anschluß an CPC 
6128 geben? Hans-Joachim 
Albus, Hintere Str. 14, 7113 
Neuenstein 


—— 


Suche dt. Anl. f. Locksmith 
bzw. wer kann mir Informa- 
tionen geben, wie ich eine 
Sicherheitskopie von header- 
losen Programmen anfertigen 
kann? Tel. 07942/2769 

Für Schneider PC 1512: 
Biete Spiele u. Anwender- 
prog. z.B. Statistik, Graphik, 
Schach usw. Kostenloses 
Info bei: M. Lehmann, Mit- 
telweg 11, 6000 Frankfurt 


Tausche Grünmon. GT 65 u. 
MP 2 gg. Farbmon. CTM 644 
(evtl. Aufzahlung) 

T. 09561/37822 
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@#*® LOHN- UND EINKOMMENSTEUER *** 
Super Jahresausgleich + Steuerkl.-wahl + Rentenertrag + 
Analyse! Für * CPC’s + IBM * Cass. 60,—, Disc. 70,— DM 
Info gg RP Jährl. Aktu. 10,— DMI Horst lichen Niederfeld- 
str. 44,8072 Manching, Tel. 08459-1669 


bezw. , 
TIER 


** Verkaufe für CPC ** 
Jedes Spiel für 5 DM. Alles 
orig. Spiele f. alle Schneider 
m. Kass. Einfach Riesenliste 
anfordern bei Frank Zanker, 
Dreizisauerstr. 12, 7306 
Denkendorf. Wer zuerst 
kommt, spielt zuerst. 


LICHTGRIFFEL 


mit Programm für CPC 
464 oder CPC 664 + CPC 
6128 nur 49,— DM. Ver- 
sand gegen Scheck/Nach- 
nahme. Info gratis! 

Fa. Schißibauer, Postfach 
1171S, 8458 Sulzbach, 
Tel. 09661/6592 bis 21h 


DISKETTEN m. 6 av. 

3 1/2”, 135 tpi DM 2,70 
1DD; 3 1/2 135 tpi DM 2,95 
2DD; 3° Marken- 

disk. DM 6,80 
Allgem. Austro-Agent. 
Ringstr. 10, D-8057 Eching, 
Tel. 08133/6116 
Baustatikprogramme f. 
CPC664, 1/a. 2 Laufw. 
Stabwerk, Durchlaufträger 
u.a. Liste gg. Freiumschlag 

v. Roland Maurer, Silcherstr. 
2, 7163 Oberrot. 

Tel. 07977/653 ab 18 h 
Suche für CPC 664: SP-Erw., 
Zweitfloppy, dBase, Multi- 
plan, Wordstar. 040/7119927 


Sozialhilfeprogramme CPC 
464 Vortex 5,25‘. Info gegen 
Freiumschlag. 
Hans Drummer, Schlaifhau- 
sen 72, 8551 Wiesentheu 
* CPC * Spiele-/Anw.-Softw. 
* PC * Markensoftw. günst. 
ab 6,99! Fa. RUEHL - soft- 
& hardware, Burgstr. 19d, 
4150 Krefeld 11 
BSEBEBEEBHESERBERERURENN 
DISKETTEN 
5 1/4”, 48 tpi DM 0,97, 2D 
3 1/2“, 135 tpiDM 2,70, 1DD 
3 1/2, 135 tpiDM 2,95, 2DD 
3° Markendisk.DM 7,00, 2CF 
Allg. Austro-Agent. Ringstr.10 
er Eching, Tel.: 08133/ 
1 


Achtung, Handwerker! 

Er ist da, das kompl. (!) 
Prog.-Paket f. den Joyce PCW 
8512. Infos kostenlos von 
Georg Huonker, Erlenbach- 
hof, 7463 Rosenfeld-Lei- 
dringen 

Verkaufe Schneider CPC 464 
m. Grünmon., fast wie neu, 
Preis VB 300 DM od. m. 
Drucker NLQ 401 VB 750 
DM. Holger Hipperling, Jä- 
gerfeldweg 52, Tel. 040/ 
7606612 

Verk. orig. je einmal Prog.- 
Generator 40,—; Schach- 
spiel (Chess) 25,—; Cop 
Master 25,—; Privat 86 (Lst.) 
40,—; Kassenbuch 30,—, 
Scheck, Vorkasse an Ahmed 
Khairy, Bachstr. 28, 5100 
Aalen 

* Top-Angebot f. CPC 464* 
25 Spiele auf einer Kass. od. 
Disk. (z.B, Q-Bert, Tower, 
Alien Hunter) f. nur 25 bzw. 
33 DM. Info: T. 05741/ 
1686 

CPC 664 grün, GE-Thermo- 
drucker, NLQ, sehr leise, 10 
Disk. m. Softw., CP/M Com- 
petition Pro Joystick, alles 1 
Jahr alt wg. Systemwechsel 
zu verk. NP 1.400 DM, VB 
950 DM. Angebote an F, 
Klapper, Palmstr. 1, 5630 
Remscheid 1 

Verkaufe DK’tronics Sprach- 
synthesizer, 2 Lautsprecher, 
dt. Anl., kaum gebr., VB 90 
DM; Eprom-Erw .„ 4 freie 
Steckplätze, kaum gebr., 

VB 90 DM (m. Betriebs- 
ROM). Tel. 0711/763900 ab 
17 Uhr, Raum PLZ 7000 
Privater Schneider-PC-1512 
Besitzer möchte gerne einen 
Club gründen. T. 0561/ 
895548 

Suche dt. Handbuch zum Star 
NL-10 u. Schaltplan zum CPC 
664. Paul K. Klimpel, Boden- 
beckerstr. 33, 495 Minden 
Spiel-Computer Sanwa yC 
uC-16 m. 2 Joyst., Adapter, 
Datasette, Büchern, Spielen 
(K), Basic-Kurs ist zu verk. 
od. tauschen gg. Hard- u. 
Software f. CPC.6128. Su. 
Schulprog. f. Kl. 1-5, Haupt- 
schule. Anngebote senden 
Sie an M. Duda, Barbarossa- 
ring 32, 6750 Kaiserslautern. 
Biete CPC664 m. Farbmon. 
u. Mirage Imager, Lightpen, 
Cumana 5.25 Zweitlaufw., 
Druckerkabel, Maus u. Softw. 
£. nur 1.000 DM 


BÖRSE 


Suche zuverlässige Tausch- 
partner (Disk./Tape) nur im 
Bereich Münster. CPC-Li- 
sten an: Stephan Eschen, 
Beethovenstr. 42, 4400 
Münster-Hiltrup, T. 02501/ 
3639 


Tausche Spiele: 

Olympiade 86, Hard Hat 
Mack, Kentilla, Don’t Panic 
gegen Winter Games (Epyx) 
od. Daley Tompson Decath- 
lon. Nur Tape. Meldet Euch 
bei Markus Bollich, Wecking- 
hauserweg 9, 4782 Erwitte 


Suche f. Schneider 6128 Soft- 
ware f. Verinsführung, Mit- 
gliederdatei, Beiträge,Einnah- 
men/Ausgaben, umfangriche 
Druckerroutinen, Lastschrif- 
ten, Überweisungen usw. 
Herbert Vollmer, Bricciusstr. 
22, 7407 Rottenburg 
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wenderprog., auch auf Disk. 
3“, f. Decodierung v. RTTY/ 
CW Signalen über RTTY/CW- 
Konverter. Info an: Günter 
Hilbrecht, Grembecker Weg 
66a, 2410 Mölln 
Basic-Compiler m. Fließkom- 
maarithmetik, wie neu, nur 
35 DM. Graphik-Master Zei- 
chenprog., auch f. Farbaus- 
drucke. Wie neu, nur 40 DM. 
Tel. 07191/58068 

Tausche Software nur 3“ 
Disk. z.B. Exploding Fist, 
Murder on the Atlantic, Figh- 
ter Pilot, Last V8, Space In- 
vasion, Reversi usw. H. 
Schwaz, Haeberlinstr. 5, 6 
Frankfurt 50, 100 % Ant- 
wort 

Wahlweise CPC 6128 m. 
Farbmon., 15 Mon. alt, VB 
900 DM od. CPC 6128 m. 
Grünmon., 4 Mon. alt, VB 
700 DM. Tel. 04479/1268 


Verkaufe RAM-Chips, 8 
Stück — 4164 — 150 Nano- 
sekunden (z.B. um die Vor- 
tex SP 64 aufzurüsten (128 
KB) f. 26,90 DM. Carsten 
Kissel, Bahnstr. 9, 6636 Über- 
herrn 1, Tel. ab 18 Uhr: 
06836/1573 
Sprachsynthesizer f. CPC 
464 nur 55 DM. T. 07191/ 
58068 


Der Public Domain User 
Club gibt an alle Interessier- 
ten Software zum Preis von 
15,— pro Disk. ab. Katalog- 
disk. (400 Titel) gg. 12,— 
Unkostenpeis von PDUG, 
Postf. 1118, 6464 Linsen- 
gericht 1 


a — 


CPC * CPC * CPC * CPC * 
Tausche starke CPC-Games 
auf Kass. u. Disk. 100 % Ant- 
wort, Liten bitte an: Daniel 
Hamers, Sinsheimerstr. 53, 
6907 Nußloch 


——-— - — 


Tape Thanatos, Cirtical Mass 
u. Light Force. Preise von 5— 
25 DM. Listen bei $S. Sommer 
22400 Lübeck, Lützowstr. 
3A, od. anrufen, od. anrufen 
Tel. 0451/623750 

Suche Plastikleerhüllen für 
3-Zoll-Disk. Kaufe od. tau- 
sche gg. Orig.-Softw. für 
Schneider CPs, Angebote an: 
Rolf Klein, Finsterheckstr. 
22,6580 Idar-Oberstein 1 
Verk. CPC 6128, Grünmon,, 
1/2 Jahr alt, wg. System- 
wechsel, Preis VB. Andreas 
Ohse, Selztalstr. 79B, 6507 
Ingelheim 

Schneider PC 1512 User- 
Club! Monatl. Zeitschr., 
Software, Hilfestellung u. 
viel mehr bietet unser Club 
allen 1512-Besitzern. Info 
von Rolf Knorre, Postf. 
200102, 5600 Wuppertal 2 


*** Top-Software-Tausch 
Tausche Spiele u. Anwend. f. 
alle Schneider-Computer 
Bitte, evtl. m. Liste, schribt 
an Ralf Weinzierl, Braungar- 
ten 1,8354 Metten. 100 % 
Antwort!! Auf geht’s! 
Verkaufe Orig.-Software: 
Space Invasion (Kass.) 15,—; 
XARQ te, 25,—; Rescue 
on Fractalus (Kass.) 15,—; 
Space Shuttle (Kass.) 15,—; 
Ghostbusters (Disk.) 25,—; 
Duesi-Vokabel-Trainer (Kass.) 
15,—. Alles incl. Handb. Mo. 
ab 18 Uhr, Basler 02501/ 
13873 

Verkaufe Orig.-Prog.: Profi- 
Painter 49,—; Spindizzy 
25,—; Happy Computer Le- 
serservice Disk. 12/86 17,—; 
per Nachnahme, 08822/ 
6030 ab 18 Uhr 

Verkaufe per Nachnahme auf 
Disk.: Profi Painter 45,— 
Music-System 30,—; Ping 
Pong, Yie Ar Kung Fu, 
Jump Jet je 16,—. Alles Orig. 
Suche AMX Pagemaker u. 
Tauschpartner (Disk.). Habe 
etwa 70 Prog. Tel. 02105/ 
0359 

Suche für 464 Desert Rats. 
Wolfram Lühning, Lesum- 
Str. 4,2810 Verden Aller 
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Verkaufe DR Draw für CPC 
6128 od. Joyce PCW 8256 

f. 120,—; Data Becker Masch.- 
Sprache- u. Hardw.-Erw.- 
Buch £. CPC 464 je 15,-—;; 
Datamedia Focus 20,—; Ko- 
pierprogramme Backup 3 

20 ,—; Transmat 25,—. Frense, 
Tel. 02381/464496 

Tausche Chiller, Speedking 
u. Kane orig. gg. vollst. orig. 
Elite-Anl. (dt.). Su. Tausch- 
partner f. Spiele, Kass. u. 
Disk. Liste senden an Oli- 
ver Wagner, Mühlenheide 49, 
4790 Paderborn 

Der Wuppertaler Schneider- 
Club sucht noch Mitglieder. 
Interessenten bitte melden 
bei: Axel Stuhlreiter, Im 
Saalscheid 6, 56 Wuppertal 
21, Tel. 0202/4697352 
Tausche Software Disk f. 
CPC 6128. Suche: Toma- 
hawk, ACE, Winter GAmes, 
World Games u, sonst alle 
Sportspiele, auch Kung Fu, 
Karate. Hedwig Maik, 4250 
Bottrop, T. 02045/2921 
Fast geschenkt! 

Verkaufe Software auf 3- 
Zoll-Disk.: Programming 
Language One, C-BASIC, 
E-BASIC, ALGOL, LISP, 
PROLOG, COBOL, FORTH, 
PISTOL, Regular Expression 
Compielr zu je 20,—. Tel. 
06051/73745 

Tausche orig. sowie selbster- 
stellte Software f. CPC 464. 
Suche auch Basic-Buch (Da- 
ta Becker). Interessenten mit 
Liste an: Robert Theuer, 
Lange Minte 23, 2819 
Morsum 


Data-B.-Buch ‚‚Das Ideen- 
buch“ 25,—; Disk. orig.: 
Rolropes, Rolspace, Harrier, 
Punchy 35,—; Disk: Tennis u. 
Billard 20 ,—. An: Schöberl 
Michael, Rotdornstr. 9, 8910 
Landsberg a. Lech 

Verk. CPC 6128 u, Wordstar, 
1 Mon. alt, 850 DM. Tel. ab 
19 Uhr 0208/854552 

Suche f. 6128: Vortex’ 
Zweitlaufwerk, Digitizer, 
Drucker. Tel. 040/7638279 
Spiel-Comp.-Sanwa; C-16 m. 
2 Joy-Adapter, 1 Joy, Spiele, 
Bücher, Datas. u. Zeitschr. 

zu verkaufen od. tauschen gg. 
Hardware u. Spiele f. CPC 
6128 (auf Disk.). Wenn Du 
Col.-Mon., Drucker, Data- 
phon... hast, willst Du sie tau- 
schen? Tel. 0631/40656 


a  — 


FW’s 
GEISTIGE 
ERGÜSSE 
ZUM 

NUTZ UND 
FROMMEN 
ALLER 
USER 


Vom WHO (World Health Ober- 
motz) wurde F.W. für seine Akti- 
vitäten im KGB, dem Kampfbund 
gegen die Bildungslücke, mit dem 
Volksschulabschluß ehrenhalber 
ausgezeichnet. Auf diese Weise an- 
gespornt, entstand eine neue Lek- 
tion für unsere „EH SCHON ALLES 
WISSER’. Es geht um die Geschich- 
te, Kultur und Faszination der ero- 
tischen Auswirkung von: 


TASTATUR —- SONDERZEICHEN 


definiert von F.W. 


Wenn Sie, verehrte Leser, glau- 
ben, ich erkläre Ihnen hier das 
Alphabet oder gar den Umgang mit 
Zahlen, dann haben Sie sich ge- 
schnitten. Aus diesem Grunde heißt 
die Tastatur eines Computers ja 
auch Benutzerschnittstelle. 

Nein, ich will Ihnen vielmehr 
etwas zur Entstehungsgeschichte 
einiger Zeichen verraten, deren Be- 
deutung Ihnen bisher noch im 
Dunkeln verborgen (Sich Borgen 
bringt Sorgen) blieb. 

Am aufregensten und unergründ- 
lichsten ist das @, im Volksmund 
auch, wenn überhaupt, Klammer- 
affe genannt. Das Zeichen ent- 
stammt der Mythologie der Kelten. 


SATIRE 


Diese Kelten galten in der Antike 
als die Erfinder des Verkehrszei- 
chens, worüber sie vor Stolz derar- 
tig ausflippten, daß sie gar nicht 
mehr aufhören wollten, Verkehrs- 
zeichen zu erfinden. So etwas führ- 
te natürlich zum totalen Chaos. 

Es gab Hinweisschilder (Ei gugge 
ma da), Warnschilder (Hier kocht 
der Chef) und schließlich Verbots- 
schilder (Plündern und Vergewalti- 
gen unter 18 verboten). Das Chaos 
verwirrte nicht nur die Kelten 
selbst, sondern auch die Invasoren, 
die zur Ankurbelung des Fremden- 
verkehrs dringend benötigt wurden. 

Die Kelten trieben dem Unter- 
gang des Reiches entgegen, als ihr 
Kaiser, Wutzebär der Grübler, noch 
einmal versuchte, das Steuer herum- 
zureißen. Er ersetzte alle Schilder 
durch ein einziges, eben dem @. 
Dieses Universalersatzschild sollte 
soviel bedeuten wie ‚„‚Paß halt auf“. 

Trotzdem, es war zu spät. Der an 
sich glänzende Einfall wurde von 
der Bevölkerung nicht akzeptiert. 
Die Kelten fielen dem Vergessen an- 
heim, geblieben ist der Nachwelt 
nur der Klammeraffe. 

„#“‘, auch bekannt als das Kreuz 
des Listings, ist dagegen aus der 
Neuzeit. Zusammen mit der Schreib- 
maschine erfand Isidor Ausgefuchst 
den Computer. Da die Elektrizität 
noch nicht bekannt war, legte er 
ihn erst einmal beiseite und widme- 
te sich seiner Frau. 

Später wurde jedoch schnell klar, 
daß ein Verfahren entwickelt wer- 
den mußte, um vorhandene Kilo- 
watze und Öhmchen rechtzeitig zu 
erkennen, schließlich sollte der 
Computer mal eingesetzt werden. 
Das ‚#‘-Zeichen fand zu diesem 
Zweck seinen Platz auf der Tastatur. 
Man nannte es liebevoll STREAM, 
was übersetzt etwa STROM be- 
deutet, auf den alle sehnsüchtig 
warteten. 

Tippt man heute dieses Zeichen 
und es erscheint auf dem Bild- 
schirm, dann ist mit Sicherheit 
Strom in der Leitung. Bleibt der 
Monitor dagegen dunkel, fehlt der 
für die Programmierung unendlich 
wichtige Strom. 

Etwas diffuser und nicht so ein- 
fach zu erklären ist das ,„$%“, 
(STRING). Hier hilft der Blick in 
die jüngere Vergangenheit. Ameri- 
ka, damals ein junges, gerade eben 
entdecktes armes Land, benötigte 
dringend Geld. In aller Eile, bevor 
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ihnen die Japaner zuvorkamen, er- 
fanden sie den Dollar mit dem Zei- 
chen ‚,$‘“ (Beachten Sie bitte, daß 
es sich um zwei senkrechte Striche 
handelt). 

Die Hektik ließ den Staatschef 
Washington (auch Erfinder der 
„Wash and Wear Jeans‘‘) jedoch ver- 
gessen, daß die Bevölkerung noch 
zu arm war, um sich einen Dollar 
leisten zu können. Kurzfristig 
wurde deshalb der halbe Dollar ‚9° 
(nur ein senkrechter Strich) einge- 
führt. 

Bis heute ist der ganze Dollar 
immer wertloser geworden, wäh- 
rend der halbe Dollar, der String, 
als Computersonderzeichen sein 
karges Leben fristet. Auch hier er- 
gibt er keinen Sinn, aber er wird, 
gerade von deutschen Programmie- 
rern, aus sentimentaler Treue gegen- 
über unserem Bündnispartner ein- 
gesetzt. 


DIE WAHRHEIT ÜBER MERLIN 


Um Geld geht es auch beim näch- 
sten Zeichen, dem „£‘“, allerdings 
muß zur Erläuterung tiefer in die 
Geschichtskiste gegriffen werden. 
Bis ins Mittelalter Englands (und 
damit ist nicht der ZX 79 gemeint) 
reicht die Tradition dieses Zeichens. 

Merlin, von Beruf Zauberer, war 
damals naturwissenschaftlicher Be- 
rater der Lancelot & Co. Gang, der 
Regierungspartei Englands. An sich 
war es ein Bombenjob, um den ihn 
viele beneideten, dıe nicht wußten, 
wie lausig die Bezahlung war. Außer 
seiner Unkündbarkeit im Beamten- 
status gab ihm King Arthur, Ober- 
vorsteher der Gang, keinen Pfennig. 
Das hätte sowieso nichts einge- 
bracht, denn die Landeswährung 
war ja kiloweise Pfunde. 

Statt dessen gab es haufenweise 
Versprechungen: ‚Wenn erst mal 
alle Feinde eins auf den Nüschel 
bekommen haben...“ oder noch 
absurder: ‚Wenn erst mal der hei- 
lige Gral gefunden ist ...“ 

Kurz und gut, von leeren Ver- 
sprechungen konnte Merlin nicht 
leben, er besann sich auf seine 
Zauberkräfte. Hinter die Summe 
seiner Honorarforderungen krikelte 
er ein magisches Zeichen, eben das 
„£“. Genutzt hat es nichts. König 
Arthur fiel auf diesen heidnischen 


SATIRE 


Hokuspokus nicht rein, erklärte 
das Zeichen für staatlich geprüf- 
ten Firlefanz und entließ Merlin. 

Die englische Herkunft des 
Schneider CPC sorgte auch dafür, 
daß das „ß“-Zeichen nicht auf der 
Tastatur zu finden ist, denn es ist 
rein deutscher Natur. Vom BASIC 
her ist es jedoch so leicht zu defi- 
nieren, daß es hier ausführlich -ab- 
gehandelt werden sollte. 

Das Licht der Welt erblickte das 
„ß“ am 23.9.17 vor Christus auf 
einer Sauftour Gerolds des Ge- 
witzten. Met-selig, im Kreise seiner 
Kumpels und zu fortgeschrittener 
Stunde — setzte dieser Gerold dem 
Buchstaben „p‘ einen Bierbauch 
an, es entstand ein „Rß“. 

An diesem Abend lachte sich der 
Stammtisch zwar scheckig, aber am 
nächsten Morgen wieder ernüchtert 
erkannte er, daß man ein „p‘‘ schon 
hatte und es ohne Bierbauch bes- 
ser aussah. Beschämt verkaufte man 
das „ß‘ an das Fürstentum Monaco, 
das schon immer eine Vorliebe für 
Kuriositäten hatte. Jahre später 
kaufte es der Musiker Johannes (Jo- 
schi) Brahms zurück und setzte es 
in einer seiner Kompositionen als 
Note ein. Die Welturaufführung 
wurde zum Fiasko, daß ‚ß‘ wurde 
geächtet. 

Johann Wolfgang von Goethe (der 
mit der Flöte), ein Shooting-Star 
der Belletristik, kümmerte sich wie- 
der darum. Dem jungen Schriftstel- 
ler kam das „ß‘“ gerade recht als 
Lückenbüßer. Hier mal eins, da mal 
eines, so gewannen Goethes Ergüsse 
an Eigenständigkeit und eroberten 
die Bestsellerlisten. Das schon im- 
mer schlechte TV-Programm unter- 
stützte diesen Trend. 

Mit Goethe feierte auch das „ß“ 
Triumphe. Beide sind dem deut- 
schen Volk (ungeteilt) unvergessen. 
Dem Nachahmungstrieb der User, 
hinter dem sich Verehrung für den 
Meister verbirgt, ist es zu verdan- 
ken, daß auf deutschem Boden kein 
Textverarbeitungsprogramm an 
Umsatz gewinnt, das dem deutschen 
„ß“ nicht die gebührende Referenz 
erweist. 

Andererseits weiß noch kein Aas, 
was das Zeichen zu bedeuten hat. 

Soweit die erste Lektion der Son- 
derzeichen. Im nächsten Teil des 
Kurses befassen wir uns näher mit 
dem Paarungsverhalten der Zeichen 
„»<“ und „>“. Geht es? Und wenn 
ja, warum nicht? 


TEST 


Wenn uns vor wenigen Wochen noch jemand erzählt hätte, daß wir -- bei 
all den Superspielen, die wir in der Redaktion haben — gebannt vor 
einer Neuauflage des bekannten „Wall-Breaker” sitzen, wir hätten ihn 
für verrückt erklärt. Aber es ist nun mal so. Pikanterweise besuchen uns 
auch Kollegen der Commodore-Welt, die zwar mit dem Amiga den (zu- 


gegebenermaßen) 
Software bisher jedoch ihr Geld an Arcade-Automaten verpulverten. 
Wir hätten uns schon ein stattliches Zubrot verdient, könnten wir Ein- 
trittsgeld verlangen. Noch eine Warnung sei dem Test vorangestellt: 
Dieses Spiel macht süchtig. 


Sie haben es gelesen, es geht um 
den neuesten Arcade-Knüller na- 
mens Arkanoid von der Firma 
Rushware, die das Risiko einer 
„Oldie“-Auffrischung auf sich ge- 
nommen hat und damit sicherlich 
Erfolg haben wird. Dabei fängt 
es gar nicht so gut an, weil zu die- 
sem inhaltlich doch recht einfachen 
Spiel mühsam eine Geschichte ge- 
zimmert wurde, die bestenfalls 
falsche Erwartungen weckt. Aber 
sie ist gottlob kurz genug, um dem 
Testbericht vorangestellt zu wer- 
den. 
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Supergrafik-Computer 


haben, mangels Arkanoid- 


Zu einer unbekannten Zeit wurde 
das Mutterschiff Arkanoid zerstört, 
wobei nur das kleine Raumschiff 
„Vau‘“ entkommen konnte. Sie 
sind nunmehr der Lenker des 


Raumschiff in Nöten 


„Vau‘ und sollten versuchen, aus 
der Leere, die Sie umgibt, zu ent- 
kommen. Dabei darf es allerdings 
nicht stören, daß sich diese Leere 
als Mauersteine darstellen, die — 
zu Beginn des Spieles — bedroh- 
lich über Ihnen schweben. Fangen 
Sie einfach an. 


Das Spiel: Steineklopfen 
mit dem Laser 


Erinnern Sie sich an die Anfangs- 
zeiten der Computerspiele und 
speziell des „‚Wallbreakers‘‘? Genau 
das gleiche Prinzip herrscht bei 
Arkanoid vor. Am unteren Bild- 
schirmrand bewegen Sie einen 
kleinen Schläger hin und her, 
mit dem Sie einen Ball wie bei 
einem Tennisspiel nach oben be- 
fördern können. Ihre vordringlich- 
ste Aufgabe ist es dabei, den 
Ball nicht zu verfehlen und damit 
die Spielrunde zu beenden. Tref- 
fen Sie richtig, dann schlägt die 
runde Kugel — bei Arkanoid 
„Strahl“ genannt — aus einer 
über Ihnen schwebenden Mauer 
einen oder mehrere Steine heraus, 
für die es je nach Farbe Punkte 
gibt. Der Ball kommt zurück, 
muß wieder getroffen werden usw. 
usw. Befürchten Sie Langeweile? 
Nicht bei Arkanoid! 

Nach den ersten paar Steinen 
lösen sich aus dem Gemäuer so- 
genannte - Energiekapseln. Sie 
schauen aus wie zu kurz geratene 
Zigarren, die langsam um sich 
selbst rotieren, während Sie herab- 
schweben. Dabei geben Sie einen 
Buchstaben preis, der etwas über 
den Verwendungszweck verrät. Die 
Energiekapseln entpuppen sich 
nämlich als brauchbare Hilfe, sofern 
Sie eine davon mit dem Schläger 
erwischen. Entweder wird der 
Schläger (Pardon: das Raunschiff 
„Vau“) breiter und die Strahlen 
sind leichter zu treffen, oder der 
ganze Spielablauf wird etwas lang- 
samer, was in der üblichen Hek- 
tik geradezu zu einer Erholung 
werden kann. Andere „Zigarren“ 
verdreifachen den Ball und damit 
die Durchschlagskraft oder verge- 
ben großzügig ein Extraleben. Mit 
zu den besten Kraftpillen, die 
man erwischen kann, gehören jene, 
die die Tür zum nächsten Raum 
öffnen (normalerweise muß man 
hierzu die ganze Mauer beseitigen) 
und den Schläger in eine Laser- 
kanone umwandeln, wobei der 
Ball aber weiterhin im Spiel bleibt 
und zurückgeschlagen werden muß. 
Ein bißchen Vorsicht ist dabei 
Hat man seinen 
Tennisschläger in die wirkungs- 
vollere Laserkanone verwandelt, 
dann sollte man sich hüten, wieder 


schon nötig. 


TEST 


eine simplere Kraftpille zu berüh- 
ren, die einem nun das „Festkle- 
ben‘ des Balles am Schläger bie- 
tet. Denn dann wandelt sich der 
„Ballermann“ wieder in jenen simp- 
len Strich. 

Mit dem „Laserkanonentennis- 
schläger‘‘ ist es dann auch etwas 
einfacher, die oberste, letzte Reihe 
der Mauer zu durchdringen. Denn 
hier muß jeder Stein mehrmals 
getroffen werden, bevor er sich 
auflöst. Ärgerlicherweise wird 
durch diese Lücke aber auch der 
Weg frei für die Außerirdischen, 
die in etwa das Aussehen eines 
Sahnetörtchens haben. Entspre- 
chend diesem Aussehen sind sie 
dann auch gar nicht so böse, 
behindern aber das Spiel ungemein, 
weil der Ball unter bestimmten 
Umständen von ihnen abprallt. 
Zerstören kann man die Stören- 
friede, indem man sie mit dem 
Schläger erwischt oder wenn der 
Ball von oben auf sie trifft. Schafft 
man es, alle Steine abzuräumen, 
oder erwischt man vorher die 
richtige Kraftpille, dann wird der 
Weg frei in den nächsten, anders 
gestalteten Raum. 


Aufgewärmtes schmeckt 
manchmal sogar besser 


Natürlich ist die Idee nicht neu. 
Man muß aber auch einmal davon 
Abstand nehmen, stets etwas Sen- 
sationelles zu erwarten. Es soll 
ja noch Leute geben, die ein Spiel 
dieser Art noch nicht besitzen 
und auch für alle anderen wurde 
mit Arkanoid die beste Version 
veröffentlicht. 

Auffallend ist zuerst einmal die 
gute Grafik. Dies betrifft im we- 
sentlichen das Tempo, in dem das 
ganze Spiel abläuft. Dabei sind 
ja mehrere Objekte in Bewegung: 
der Schläger, die Bälle, eventuell 
eine sich drehende Kraftpille und 
ständig die Außerirdischen am 
oberen Bildrand. Jedes der Sprites 
läuft dabei ruckfrei und schnell 
über den Bildschirm. Daß derlei 
Spiele sehr bunt sind, müßte 
eigentlich nicht extra erwähnt wer- 
den, es soll jedoch darauf hinge- 
wiesen werden, daß die Farben 
„augenfreundlich“ gewählt sind. 

Der Sound orientiert sich an 
der Arcade-Geräuschkulisse und be- 
steht demzufolge aus elektroni- 
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schen Tönen, aus denen man 
nach einer Weile doch jene aku- 
stischen Signale heraushören kann, 
auf die man zu reagieren hat. 
Viel Melodie darf dabei natürlich 
nicht erwartet werden. Im Vor- 
spann und während des Haupt- 
menues bewiesen die Programmie- 
rer allerdings, daß sie auch so et- 
was wie Musik hinbekommen. Die- 
ser Vorspann ist übrigens deshalb 
so bemerkenswert, weil hier mit 
den einfachsten Mitteln (Lauf- 
schrift vor Sternenhintergrund) Ein- 
drucksvolles gelang. Was den sau- 
beren Ablauf der Bewegung an- 
geht, kann man sich hier schon 
einmal auf das Spiel einstimmen. 
Ansonsten stört die ziemlich lange 
Zwischenmusik eher, da wohl je- 
dem die Pause zu lang wird. 

Jedes Geschicklichkeitsspiel steht 
oder fällt mit der Joysticksteu- 
erung. Hier kann dem Programm 
nichts Nachteiliges nachgesagt wer- 
den. So hektisch auch das Spiel 
geriet, immer war die Lenkung 
des Schlägers präzise. 


Fazit: Ein ‚‚Wallbreaker‘‘, wie er 
besser nicht zu programmieren ist 


Normalerweise ergänzen wir unser 
Fazit eigentlich um den Hinweis 
der Käufergruppe, was aus dem 
Satz „Für Liebhaber des Genres 
...““ hervorgehen soll. Diesmal müs- 
sen wir ausdrücklich darauf hin- 
weisen, daß wir uns mit der Zu- 
sammenfassung an alle richten, 
die überhaupt einen CPC besitzen. 
Liebhaber von Geschicklichkeits- 
spielen werden um Arkanoid gar 
nicht herumkommen, es gehört 
schlicht und einfach in jede Soft- 
waresammlung. Allen anderen, die 
einen Joystick eher mißtrauisch 
beäugen, sollten sich doch we- 
nigstens einmal 10 Minuten an 
dieses Spiel setzen. Danach wer- 
den sie vielleicht über den ,„Wall- 
breaker-Oldie‘“ vergessen, daß sie 
mit dem Computer eigentlich arbei- 
ten wollten. Für Arkanoid gilt 
also unsere uneingeschränktes Ur- 
teil: Sehr empfehlenswert. 

Übrigens sind vielleicht einige 
gut informierte Kreise davon ver- 
unsichert, daß die Commodore 
C64 Version einen Programmfeh- 
ler aufweist (bis zu 87 unverdien- 
te Extraleben).. Die Schneider- 
Version allerdings ist fehlerfrei. 


TEST 


BIENEN? 


Verrückte Geschichten waren schon immer die Vorliebe der Engländer. 
Dies brachte ihnen unter anderem den amüsierten Vorwurf ein, ein wenig 
„spleenig’ zu sein. Wenn es jedoch darum geht, ein relativ einfaches Spiel 
für die Phantasie des Käufers ein wenig aufzubereiten, dann sind solche 
Erzählungen gerade richtig. Vorweg also das wundersame Erlebnis von 


Fräulein Myrtle Rowbotton. 


Seit Myrtle Rowbotton wegen des 
Krieges aus London nach Upper 
Slaughter evakuiert worden war, 
hatte sich ein Wunsch in ihrem Herz 
festgesetzt: Sie wollte in dieser 
liebenswerten Umgebung ihren 
Ruhestand verbringen, denn 34 Jah- 
re harter Arbeit hinterlassen eben 
ihre Spuren: Sie war erschöpft und 
brauchte deshalb Ruhe und ihren 
Tee. 

Am Freitag, dem 13. Mai 1988, 
sollte dieser Frieden unsanft zer- 
stört werden. 

Vor dem Abendessen überquerte 
Myrtle den englischen und somit 
kurzgeschnittenen Rasen und ging 
zu ihrem Bienenhaus. Gerade das 
Beobachten der Millionen von Bie- 
nen verlieh ihr die notwendige 


Die Vorgeschichte: Typisch für 
einen Freitag, den 13. 


Ruhe. Aber heute schien etwas 
verändert zu sein. Sie wußte nicht 
warum und wieso, aber irgendwie 
hatte sie den Eindruck, daß der 
Himmel sich verdunkele. Doch das 
konnte nicht sein, denn zur Abend- 
dämmerung war es noch viel zu 
früh. 

Als sie ihren Blick zum Himmel 
richtete, wurde ihr Gesicht bleich, 
denn oberhalb ihres Gartens schweb- 
te ein unheimliches Gebilde. Und 
dieses Gebilde sah aus wie ein rie- 
siger Bienenkorb, der fast den gan- 
zen Himmel ausfüllte und aus einer 
anderen Dimension zu kommen 
schien. 

Der Bienenkorb wurde größer, als 
er den Boden berührte. Myrtle rann- 
te, so schnell es ihre Beine erlaubten, 
zurück in ihr Wohnhaus und schloß 
sämtliche Türen und Fenster. In 
den Feldern stand der metallen aus- 
sehende Bienenstock, aus dem plötz- 
lich mit einem lauten Knall Insek- 
ten aus den vielen Ausgängen her- 


vorquollen, jedes Insekt so groß 
wie ein Omnibus, und sie machten 
keinen friedlichen Eindruck. 

Für Myrtle bestand kein Zweifel, 
die Welt war in Gefahr. Und sie war 
die erste, die davon wußte. Sie ging 
zum Telefon, um die Behörden zu 
alarmieren. Es war 20.47 Uhr und 
zur Evakuierung ihres Heimatortes 
war kaum noch Zeit. 

Die Behörden hatten nur eine 
Möglichkeit. Einer der Mutigsten 
mußte in diesen Bienenstock vor- 
dringen und die „Königin“ vernich- 
ten. Als Fahrzeug für diese Aktion 
stand ein neuentwickeltes Super- 
gefährt zur Verfügung, das S.E.A. 
Mk2. Diese Neuentwicklung trug 
den Spitznamen „Grashüpfer‘‘, da 
es wegen seiner besonderen Sprung- 
und Druckfähigkeit berühmt gewor- 
den war. Dieser Grashüpfer war 
zum Einsatz in einer feindlichen 
Umgebung entwickelt worden und 
mußte jetzt seinen ersten Einsatz 
absolvieren. 

Und der Pilot dieses supermoder- 
nen Fahrzeugs sind SIE (wie üb- 
lich). Natürlich wird es keine Spa- 
zierfahrt und Sie müssen bei Ihrem 
Einsatz einige überlebenswichtige 
Punkte beachten, aber — als erfah- 
rener Krisenmanager, der Sie dank 
der Spielprogrammierer schon sein 
dürften — fällt Ihnen dies sicherlich 
nicht schwer. 


Energie: Gratis, aber nur mit 
Schwierigkeiten zu erhalten 


Der Grashüpfer bezieht seine Ener- 
gie aus „‚Pylons‘‘, die sich im Inne- 
ren des Bienenkorbes befinden und 
die Sie aufnehmen müssen. Denn 
ohne Energie kommen Sie nicht 
weit. Als Erklärung muß dies erst 
einmal reichen, denn es konnte 
nicht ermittelt werden, was in 
diesen Pylons ist und womit somit 
das schicke Gefährt angetrieben 
wird. 


92 


Die Energie verringert sich, je 

schneller Sie sich fortbewegen und 
je mehr Sie an Ausrüstung in Ihrem 
Fahrzeug bei sich haben. Haben Sie 
keine Energie mehr, so ist Ihre Mis- 
sion beendet und die Menschheit 
nicht mehr zu retten. 
Das Schiff wird automatisch die 
Gänge im Innern des Bienenkorbes 
entlangfahren. Nur bei Abzweigun- 
gen müssen Sie sich entscheiden 
und zwar reaktionsschnell. 


Manövrierung: Durch extreme 
Geländegängigkeit erschwert 


Es werden viele Hindernisse auf 
Sie zukommen, so zum Beispiel 
Dornen, Stacheln und Spinnweben 
aus rostfreiem Stahl. Und da muß 
sich dann Ihr Fahrzeug bewähren, 
indem Sie es hüpfen, kriechen oder 
schießen lassen. Manche der Waben- 
gänge sind mit Sperrgattern verse- 
hen, die Sie nur mit dem richtigen 
Schlüssel öffnen können. 


Hive (der Bienenstock) bietet gute Vektor- 
grafik und schnelle Bewegung. 


Sie sind mit drei Leuchtbomben be- 
waffnet, die Sie überall abfeuern 
können, um sich in den verschlunge- 
nen Gängen zurechtzufinden. Dabei 
entdecken Sie vielleicht auch die im 
ganzen Bienenkorb versteckten, 
zahlreichen Gegenstände, die Sie 
bei Bedarf aufnehmen können und 
Ihrer Ausrüstung hinzufügen kön- 
nen. Dabei müssen Sie allerdings ein 
wenig vorausdenken, denn nicht al- 
les, was Ihnen unnütz erscheint, ist 
wirklich wertlos. 

Manche Ausrüstungsgegenstände 
arbeiten automatisch, andere müs- 
sen ausgelöst werden, das schwieri- 
ge ist nur, daß Sie so etwas selbst 
herausfinden müssen. 

Beachten Sie aber folgendes: Sie 
können von Ihrer Ausrüstung im- 
mer nur einen Gegenstand benut- 
zen. Wenn Sie zum Beispiel einen 
Schlüssel benutzen, um ein Tor 


zu öffnen, können Sie nicht gleich- 
zeitig schießen. 


Der Feind: Die Maschinen der 
Bienen 


Die Feinde, die sich Ihnen entge- 
genstellen, werden immer zahlrei- 
cher und stärker, je tiefer Sie in den 
Bienenstock vordringen. Dafür müs- 
sen Sie natürlich gerüstet sein. Er- 
wischt Sie ein Wärter, und davon 
gibt es einige, so finden Sie sich au- 
tomatisch in einem Verlies in der 
ersten Ebene, aus dem Sie nur her- 
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auskommen, wenn Sie sich vorher 
aus der Ebene Zwei einen speziellen 
Schlüssel mitgenommen haben. 

Wenn Ihnen alles mal zu viel 
wird (kann in der Hektik dieses 
Spieles schon mal passieren), dann 
haben Sie immer noch die Möglich- 
keit, das Spiel abzubrechen und 
beim Neubeginn den alten Spiel- 
stand einzugeben, indem Sie in den 
„Code-Display‘‘ den erforderlichen 
Code hineinschreiben. 


Programmgestaltung: Dreidimen- 
sionale Bewegung in Vektorgrafik 


So sehr einen auch die Geschichte 
und die damit verbundenen techni- 
schen Einzelheiten anregen werden, 
in erster Linie kommt es immer 
noch darauf an, was die Program- 
mierer aus dieser Idee gemacht ha- 
be. 

Etwa ein Drittel des Bildschirmes 
nimmt die Anzeigentafel ein. Hier 
sind alle wichtigen (und weniger 
wichtige) Daten angegeben, etwa 
ein Waffenschaubild oder die Anzei- 
ge der Lebensenergie. Zur Orientie- 
rung oder zur Warnung wird mitge- 
teilt, ob man eine Kreuzung hinter 
sich hat oder ob man von einer 
Biene angegriffen wird. Behält man 
dieses Amaturenbrett des Grashüp- 
fers im Auge, dann ist es leichter, 
sich in dem Bienenstock zurechtzu- 
finden. Die Kontrolle der Anzeigen 
fällt jedoch nicht immer leicht, da 
sich im Aktionsfenster eben doch 
recht viel tut. 

Dieser Bildschirmteil ist — um 
bei der Geschichte zu bleiben — das 
Fenster nach draußen. Vielleicht 
mag bei einigen Käufern Enttäu- 
schung angesichts der Vektorgrafik 
aufkommen. Dies heißt, die Gänge 
werden nur als Kreise dargestellt, 
die nach und nach größer werden 
und so einen räumlichen Eindruck 
vermitteln. Die Gegner, die es zu 
bekämpfen gilt, oder die Gegenstän- 
de, die man aufsammeln kann, sind 
ebenfalls nur mit ein paar Strichen 
symbolisiert. Nach der Einleitung 
und der detaillierten Schilderung 
der Situation erwartet manch einer 
sicherlich eine bessere Grafik und 
denen gilt dieser Hinweis. 

Wer seinen CPC schon etwas län- 
ger hat, der wird wissen, daß mehr 
an Tempo nicht aus dem Prozes- 
sor Z 80 herauszuholen ist. Noch 
vor kurzer Zeit feierte man mit dem 
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Weltraumspiel ‚Elite‘ den gleichen 
grafischen Ablauf als das Beste 
(Machbare) für den Schneider CPC. 
Man darf also ruhig gnädig sein 
und die Leistungen der Program- 
mierer anerkennen, die es geschafft 
haben, ein recht schnelles Spiel zu 
entwickeln, bei dem nach einer Wei- 
le tatsächlich ein dreidimensionales 
„Feeling“ aufkommt. 

Der Sound dagegen fällt in keiner 
Weise aus dem Rahmen. Die Hetz- 
jagd durch den Bienenstock wird 
durch passende Geräusche unter- 
malt, die sowohl die Geschwindig- 
keit des Fahrzeuges signalisieren als 
auch Treffer anzeigen. 

Die Steuerung per Joystick ist 
leichtgängig, verschiedene Tätigkei- 
ten machen jedoch die Tastatur 
notwendig. Es ist also nicht mög- 
lich, sich entspannt zurückzuleh- 
nen, um es den Bienen ‚mal zu 
zeigen“. Für die Schwierigkeits- 
grade darf man dagegen selbst sor- 
gen, indem man die Geschwindig- 
keit seinem Reaktionsvermögen an- 
paßt. 


Fazit: Spaß und Spielwert für alle 


Daß man Action am einfachsten 
produziert, indem man den Spieler 
schießen läßt, ist klar. Bei „Hive“ 
erübrigt sich jedoch der moralische 
Zeigefinger. Die Geschichte sorgt 
für Realitätsferne und das Gesche- 
hen auf dem Bildschirm ist sehr ab- 
strakt. Man wird mit solchen Pro- 
grammen keine Aggressionen er- 
zeugen und den Scharfschützen 
unter den Joysticklenkern kann das 
Spiel mit ruhigen Gewissen angebo- 
ten werden. 

Zudem ist auch noch Reaktions- 
vermögen und taktisches Überlegen 
notwendig, so daß aus dieser Idee 
wahrlich mehr wurde als die Kurz- 
formel ‚Schieß oder Stirb‘. Trotz 
unserer Empfehlung — die somit 
ausgesprochen wurde — raten wir 
jedem, sich erst einmal Hive anzu- 
schauen oder unser Bild dazu. 
Gerade wer noch nichts mit dem 
Begriff Vektorgrafik anfangen kann 
und mit allzu großen Erwartungen 
(nach so einer Geschichte) sollte 
nicht überstürzt kaufen. Wie bereits 
erwähnt, reizt der Ablauf der räum- 
lichen Bewegung den Prozessor 
ganz aus. Fraglich jedoch, ob man 
damit schon zufrieden ist. 

JE) 
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komplexes. Diesen Ausschnitt kön- 
nen Sie auch wechseln. Interessant 
ist es, zum Beispiel auf drei der vier 
Bildschirme jeweils einen anderen 
Ausschnitt zu legen und auf den 
vierten Bildschirm das sogenann- 
te TGS. 

Dieses ‚Telementry Guildance 
System‘ ermöglicht Ihnen den Blick 
aus der Vogelperspektive auf das ge- 
samte Gelände innerhalb eines Um- 
kreises von etwa 5 Meilen. Damit 
können Sie sich immer einen Über- 
blick verschaffen, ob die von Ihnen 
ferngesteuerten MRU’s entdeckt 
worden sind oder ob die Gefahr der 
Entdeckung besteht. 

Die MRU’s werden durch Anwäh - 
len der Taste MRU angewählt. 

Mit dem eingebauten Videorecor- 
der können Sie sich wahlweise auch 
Bildaufzeichnungen ansehen. Dazu 
werden die entsprechenden Tasten, 
wie Play-, Stop-, Pause- sowie Vor- 
und Rücklauf wie bei einem handels- 
üblichen Videorecorder bedient. 
Zusätzlich wird noch die Zeit, wann 
die Aufnahme durchgeführt wurde, 
eingeblendet. 


Steuerung der MRU’s: 
Vorsicht vor dem Wachpersonal 


Innerhalb des Militärkomplexes 
müssen Sie die eingesetzten MRU’s 
auf die Zielobjekte fernsteuern. 


Nach dem Anklicken der MRU-Ta- 
ste haben Sie die Kontrolle über 
dieses Gerät übernommen. 

Mit dem Joystick lenken Sie jetzt 
die MRU’s so die verwinkelten Gän- 
ge entlang, bis Sie die Aktenschrän- 
ke und die Code’s für das Öffnen 
des Panzerschranks entdeckt haben. 
Aber natürlich haben die Sowjet’s 
überall Wachpersonal postiert. Wird 
Ihr MRU entdeckt, schlagen die 
Wachposten Alarm. Nun besteht die 
Gefahr, daß Ihr MRU zerstört wird. 
Denn durch den Alarm wird ein Ab- 
wehrroboter aktiviert, der sich 
schneller als Ihr MRU durch die 
Gänge bewegt und, wenn er ihn 
erwischt hat, in den Boden stampft. 
Und das hält kein MRU aus. Zum 
Glück haben Sie aber drei dieser 
MRU’s zur Verfügung. 

Ihr jeweils aktives MRU können 
Sie aus der Vogelperspektive beob- 
achten, wenn Sie auf einen der 
Monitore das TGS gelegt haben. 
Deshalb ist es so wichtig, neben den 
Kameras auf den vierten Monitor 
das TGS zu legen, denn sonst wis- 
sen Sie ja nicht, ob Ihr MRU in 
Gefahr ist oder nicht. 


Fazit: Denkspiel für Strategen 
und Taktiker 


Hier liegt ein gutes Programm mit 
neuen Spielideen vor, das auch das 
Verständnis für abstrakte Situatio- 
nen erfordert und nicht nur einen 
starren Daumen zum Ballern. 

Das Spiel hat eine ausgezeichnete 
Grafik, der Bildschirmaufbau voll- 
zieht sich sehr rasch. Leider gehört 
der Sound nicht zur Spitzenklasse, 
aber das stört eigentlich nicht wei- 
ter, denn die Spielidee fesselt im- 
mer wieder von Neuem. Zum erfolg- 
reichen Spielen von Hacker Il ge- 
hört schon etwas Übung. Denn das 
Retten der westlichen Zivilisation 
vor der Plänen der sowjetischen Re- 
gierung ist ja auch nicht einfach. 

Die Anleitung zu diesem Spiel 
ist sehr ausführlich und auch, was ja 
nicht immer der Fall ist, in einiger- 
maßen guten Deutsch abgefaßt. Bei 
manch anderen Spielen ist dies ja 
nicht so selbstverständlich. Da muß 
man sich manchmal direkt als 
Sprachwissenschaftler betätigen, 
um in etwa mit dem Spiel klarzu- 
kommen. Aber bei Hacker II ist 
selbst die Übersetzung der Anlei- 


tung sehr gut gelungen. 
JE) 
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Reportfunktionen: Mehrere 
Ausgabeformen für eine Datei 


GBase bleibt bei den Druckaus- 
gaben bei seinen eigenen Ansprü- 
chen, der Mischung aus Bequem- 
lichkeit und Leistungsfähigkeit. Für 
die Tabellenausgabe, die entgegen 
des Menuetitels nicht unbedingt 
auf den Drucker erfolgen müssen, 
werden Report-Dateien erstellt. 
Auch hier sind mehrere Formen 
zu einer Datensammlung möglich. 
Sie werden abgespeichert und unter 
ihrem Namen aufgerufen. Die ge- 
wünschten Felder werden dann 
entsprechend den einzelnen Such- 
und Ausgabebedingungen entweder 
auf den Bildschirm, auf den ange- 
schlossenen Drucker oder die Dis- 
kette ausgegeben. 


Handbuch Erster Teil: Gut 
Handbuch Zweiter Teil: ??? 


Der Test des Programmes war 
bei uns so aktuell, daß wir nur 
einen Teil des Manuals — die 


Starthilfe — testen konnten. Auch 
dieser Teil wurde noch nicht 
Korrektur gelesen, so daß wir 
uns nur auf den Umfang, bzw. 
die Hilfe beschränken können, die 
dieses Buch bietet. Auf 55 Seiten 
wird die komplette Handhabung 
einer Datei, angefangen von der 
Maskenerstellung bis zur Drucker- 
ausgabe, anhand eines Beispieles 
erklärt. Mit solchen Trainingsme- 
thoden wird man sicherlich zu 
einem schnellen Erfolg ohne lang- 
wierige Einarbeitungszeit gebracht. 
Allerdings bleiben viele Fragen 
offen, die bei einer eigenen Datei 
entstehen können. Die Formelein- 
gabe und insbesondere die Er- 
stellung von Reports wurden sehr 
oberflächlich abgehandelt. Die Ar- 
beitsdatei, anhand der das Manual 
die Erläuterungen gibt, sind hier- 
zu allerdings auch nicht geeignet. 
Soweit die Optionen beschrieben 
wurden, geschah dies ausführlich 
und sehr informativ mit ausreı- 
chendem Bildmaterial. Was völlig 
fehlte, allerdings auch nichts in 
einem Trainingsbuch zu suchen 
hatte, war ein Stichwortverzeichnis 
und eine Kommandoübersicht. Weil 
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in dieser Starthilfe aber auch 
Querverweise auf das eigentliche 
Handbuch zu finden sind, gehen 
wir von einer recht ausführlichen 
Programmliteratur für GBase aus. 
An der vorliegenden Version fand 
sich jedenfalls kein Punkt zu 
Beanstandung. 


Fazit: Trotz großer Leistung ist 
Fehlbedienung ausgeschlossen 


Das große Vorbild (auch auf die 
Gefahr hin, jemanden zu verär- 
gern), zeigt, wie schwer es ist, 
eine leistungsfähige Datenbank zu 
programmieren, die in all ihren 
Optionen bequem genutzt werden 
kann. Eigentlich wurde dieser .An- 
spruch erst mit GBase so recht 
erfüllt. Sicherlich hängt dies auch 
damit zusammen, daß das Pro- 
gramm vollständig in GEM ein- 
gebunden wurde und einige — 
meist optische Extras — erst hier- 
durch möglich sind. Vieles jedoch 
wurde durch die Programmierer 
geleistet. Fehlbedingungen sind fast 
unmöglich, solange man die Warn- 
hinweise der entsprechenden Fen- 
ster beachtet. Den größten Alp- 
traum eines Datenbankbenutzers 
kann man also vergessen. Die 
Bedienung des Programmes ist 
äußerst einfach. Abgesehen von 
der Maussteuerung sorgt ein voll- 
ständig deutscher Programmtext 
für Klarheit und Logik. Gegenüber 
anderen Datenbanken konnten bei 
den meßbaren Kriterien — etwa 
Dateigröße, Anzahl der -Suchkri- 
terien und Verknüpfungen — keine 
Abstriche gemacht werden. Es 
scheint, daß mit GBase auch 
GEM ein wenig den Geruch eines 
Spielzeug-Systemes verliert. Unter 
Umständen hat SPI mit GBase 
auch ein wenig für die Verbrei- 
tung dieses Systemes beigetragen. 
Einziger Nachteil ist der man- 
gelnde Zuschnitt auf die Grund- 
konfiguration des Schneider PC 
1512. Wie eingangs erwähnt, dürf- 
ten sich jene PC-Besitzer die Haare 
raufen, die nur ein Laufwerk be- 
sitzen, während die Arbeit bei 
einem Disketten-Duo gerade erst 
erträglich wird. Und wie schon bei 
GEM, so ist es auch bei den Lauf- 
werken möglich, daß der Verkauf 
an Festplatten oder Zusatzlauf- 
werken etwas ansteigen wird. 
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